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Preface 


This manual describes the internal logic of 
the IBM System/360 Operating System F 
Assembler. The introduction gives the pur- 
pose of the assembler and summarizes the 
system required to operate this assembler. 
The organization of the F Assembler follows. 
The bulk of the manual is devoted to detail- 
ed descriptions of the operating phases of 
the F Assembler. 

Effective use of this document is based 
on an understanding of the latest versions 
of the following manuals: 


OS Assembler Language, Order 
No. GC28-6514 


IBM System/360 Principles of 
Operation, Order No. GA22-6821 


OS Loader and Linkage Editor, 
Order No. GC28-6538 


Third Edition (December, 1970) 


OS Introduction, Order No. GC28-6534 


OS Supervisor Services and Macro 
Instructions, Order No. GC28-6646 


OS Data Management Macro Instructions, 
Order No. GC26-3794 


OS JCL Reference, Order No. 
GC28-6704 


OS Assembler F Programmer's Guide, 
Order No. GC26-3756 


OS Data Management for System 
Programmers, Order No. GC28-6550 


OS MFT Guide, Order No. GC27-6939 


OS MVT Guide, Order No. GC28-6720 


This is a major revision of, and obsoletes, GY26-3700-1 and Technical Newsletter GY33-8028. 


This edition reflects the following changes: 


@ The SYSTERM data set added 
e Changed logic for OPSYN handling 
e The WXTRN instruction added 


Changes to the text and illustrations are indicated by a vertical line to the left of the change. 


‘This edition applies to release 21 of IBM System/ 360 Operating System and to all subsequent 


releases until otherwise indicated in new editions or Technical Newsletters. 


Changes are 


periodically made to specifications herein; before using this publication in connection with the 
operation of IBM Systems, consult the latest SRL Newsletter, Order No. GN20-0360, for the 


editions that are applicable and current. 


Requests for copies of IBM publications should be made to your IBM representative or to the 


IBM branch office serving your locality. Comments become the property of IBM. 


A form is provided at the back of this publication for reader’s comments, If the form has 
been removed, comments may be addressed to IBM Nordic Laboratory, Publications Development, 
Box 962, S-181 09 Lidingé 9, Sweden. 


©Copyright International Business Machines Corporation 1966, 1969, 1970 
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SUMMARY OF AMENDMENTS 


FOR GY26-3700-2 
OS RELEASE 21 


PURPOSE OF THE ASSEMBLER 


The assembler is designed to translate a 
source program coded in IBM System/ 360 
Operating System Assembler Language into a 
relocatable machine language object program. 
The assembler also assigns relative stor- 
age locations to instructions and other 
program elements and performs auxiliary 
assembler functions designated by the pro- 
grammer. The assembler performs its func- 
tions in two principal sections: the macro 
generation and conditional assembly section 
(Phases Fl, F2, and F3) and the assembly 
section (Phases F7, FI, F8, and FPP). 

The object programs produced by the 
assembler are in the format required by the 
linkage editor. The linkage editor pro- 
duces load modules, following source pro- 
gram assembly, which are executable under 
the control of the operating system. | 

Several output options are available for 
the assembler. The programmer specifies the 
device for the object modules, etc. He may 
request an assembly listing, a cross- | 
reference table of symbols as part of the 
listing and the insertion of a special 
source symbol table in the object module to 
facilitate TESTRAN. See Appendix A for de- 
tails. 


SYSTEM ENVIRONMENT 


The IBM System/360 Operating System con- 
Sists of a control program and several proc- 
essing programs. The control program gov- 
erns the order in which the processing pro- 
grams are executed, allocates resources, 
and provides services that are required in 
common by the processing programs during 
their execution. The processing programs 
consist of language translators and service 
programs usually provided by IBM to assist 
the system user, plus problem programs 
written by the user and incorporated as 
part of the system. The assembler is a 
language translator, one of the processing 
programs of the IBM System/360 Operating 
System. See Figure l. 

The assembler can operate on IBM System/ 
360 Models 40 and up or IBM System/370 
Models 135 and up. It requires only the 
standard instruction set. 


SYSTEM AND I/O REQUIREMENTS. 


These requirements are divided into three 
categories: internal (or main) storage, 
external storage devices (data sets), and 
control program services. 


Figure 1. 
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© Job Management 
@ Task Management 
o Data Management 





LAN GUAGE SERVICE PROGRAMS PROBLEM PROGRAMS 


TRANSLATORS 





Linkage Editor 
Sort & Merge 
Utility Programs 
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Assembler 
FORTRAN 
RPG 


System Generator 


User written 
service programs 





TESTRAN 

Te lecommunications 
Program Generator 

User written language 


Translators 





IBM System/360 Operating System 


Main Storage 


Main storage requirements include the mini- 
mum requirement of the Operating System 
Control Program. In addition, at least 
45,056 bytes of contiguous core storage 
must be available for the assembler. Addi- 
tional core storage will be used if avail- 
able (see Table 1). The assembler is not 
reentrant. 


Data Sets 


The required data sets intlude one (SYSRES) 
containing the operating system components, 
which usually includes the assembler, three 
utility data sets (SYSUT1, SYSUT2, and 
SYSUT3) , one input data set (SYSIN), and a 
data set (SYSLIB) containing system macro 
definitions and source coding to be called 
for through COPY assembler instructions. 
There are four optional output data sets 

as follows: 
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Table 1. Storage Allocation 


Phase F] Phase F2 Phase F3 Phase F7 Phase Fl Phase F8 Phase FPP 


ASM - 400 bytes 


Assembler Control Table - 2000 bytes 


MAC - 1300 bytes 


Adjustment Table - 1000 bytes 


Pautege | FPP Logic 
7600 bytes 5500 bytes 


FI* Logic F2 Logic 
15500 bytes 15500 bytes 


F7 Logic FI” Logic F8 Logic Sort Buffers (4) 


Write Buffers ZInOr ye? 21000 bytes 21000 bytes 7000 bytes 


(1 or 2) 7300 
bytes each 
(max) 


FD (Diagnostic) 
; Logic and Message 
Cross-Ref Buffer Table 
1700 bytes 8500 bytes 


Generation (overlapped by 
Dictionaries initial logic) 
(Variable Size) 
(Min = 45056 bytes 
less the sum of all 
other allocated 
main storage areas; 


Max = 65536 bytes) 


200 bytes 


Common Storage Area 


3300 bytes 


Text Output 
Buffers (2) 
7300 bytes 
each 

(max) 


Print Buffers and QSAM Logic 
8000 bytes 


Dictionary Area (Variable Size) 
12288 - 65536 bytes 


Text Input Buffers (2) Merge Buffers 
7300 bytes each (max) 3500 bytes 


Miscellaneous Buffers - 200 bytes 


V/O Buffers Main Storage 


- (Variable Size Area, max 14600 bytes + Symbol and Internal Table Area Sort Area 


macro library blocksize) 12000 - 445400 bytes ia 





* NOTE: The Fl logic area is apportioned to the size of F2 logic for core storage management purposes. The Fl logic actually occupies 
only a fraction of this area. 
“* NOTE: The actual size of FI logic is approximately 3800 bytes. Part of the remaining area is used for storing tables. The text input buffers 
are not used by this phase. However, the large logic area and the text input buffer areas are maintained throughout the phase to avoid 
possible fragmentation of core by the Operating System and consequent unavailability for Phase F8. 


1. Print data set for the ordinary listing tains the control program and other opera- 
(SYSPRINT). ting system components. The assembler 
2. Assemble-and-go data set (SYSGO). program, itself a component of the operating 
3. Punch data set (SYSPUNCH). system, is usually kept'on this data set. 
4. Remote data set for diagnostic informa- | 
tion (SYSTERM). | | SYSUT1, SYSUT2, SYSUT3. These three utility 
data sets are used as intermediate external 
See Figure 2 and Table 2. storage. Three DASD logical files, three 


magnetic tape units, or any combination of 

the DASD and tape data sets may be used. 
SYSRES. This is a Direct Access Storage The use and formats of these data sets vary 
Device (DASD) resident data set which con-- from phase to phase. 


“ Table 2. Data Set Usage 


Phas: SYSUTI SY SUT2 SY SUT3 SY SIN SYSLIB 


Write/read Write edited Read source 














Read source 
text 


Write source 
edited text 


Initial statement 
scan 

























Scan programmer macro Write source Read source 



































































definitions & subset text loca, dictionary text/macro text text (optional) 
each local dictionary segments dictionary 
Scan main portion Write source Write/read Read source Read source 
of program edited text local dictionary text text 

segments (optional) 
Scan system macro Write/read Write edited Read source 
definitions; subset local dictionary | text/macro text . 
each local dictionary segments dictionary (optional) 











Read local 
dictionary 
segments 

main program 


Subset global 
dictionary and 

local dictionary 
for main program 











Read edited 
text/macro 
dictionaries 


Write source 
edited text 


Read source 
edited text 


Conditional assembly/ 
macro generation 





Prove] Function | SYSUT]I SYSUT2 SYSUT3 SY SPRINT es | SYSTERM 









Main line contro] 


Write literal 
* 
Read text base table 


Write text* 


Write literals 
in text 


Write symbol 


_ Process symbols 


and literals table segments 

















Process PUNCH state- 
ments & TESTRAN 
symbol table 




















Write external 
symbol dictionary 
segments & cross 

references 


Process external 
symbol dictionary 

and cross-reference 
entries 






Write PUNCH 
statements and 
TESTRAN 
symbol table 


Write external 














Read literal base Write external 
























7 eo oi 
Process external penuees Miike hi table and ex- symbol dictionary | symbol dictionary 
~ symbol dictionary pias ternal symbol dic- 
table . 
tionary segments 
Final assembly Read text* Read literal Write relocation Write text Write object 
ela ilak | dictionary, diag- ao 
nostics, and 
flagged statements 


Write reloca- 

tion dictionary 
Read reloca- Write reloca- 
tion dictionary tion dictionary 


Process relocation 


dictionaries 





Process cross~ Read cross- Write cross- 
reference list references reference list 


Fi 

F8 ; 
Process relocation 
dictionary entries 


Process, assembly Read Write Write diag- 
statistics diagnostics diagnbstics nostic infor- 
mation | 


*NOTE: If an odd number of iterations occur due to symbol table overflow in F7, the functions of SYSUTI and. SYSUT2 are reversed where indicated, 
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UTILITY j FILES 


Figure 2. Data Sets Used by the Assembler 


SYSIN. This is a DASD, tape, or card reader 
resident data set containing the source text 
to be assembled. The source text consists 
of control text, programmer macro defini- 
tions, and text of the main portion of the 
program. The format is assumed to be 
80-byte logical record card images, blocked 
as necessary. 


SYSLIB. This is a DASD resident, parti- 
tioned data set containing system macro 
definitions and source text which may be 
COPYed into programmer macro definitions, 
into the main text of the program, or into 
system macro definitions. This may be 
blocked. 


SYSPRINT. This is a printer, DASD, remote 
terminal, or magnetic tape resident data 
set containing output text for printing. 
This may be blocked. 


SYSPUNCH. 
put text for punching. 


45,056 bytes 
minimum 
Contiguous 

Core 
Storage 
(Plus 
Operating 
System 
Control 
Program 







Either one 
or both 










SY SLIB 





This data set contains the out- 
It may be punch, 


DASD, or magnetic tape resident. This may 
be blocked. 
SYSGO. This is a DASD or magnetic tape 


resident data set containing the same output 


text as SYSPUNCH, but is used as input for 
the linkage editor. This may be blocked. 


SYSTERM. This is a remote terminal resi- 
dent data set containing diagnostic infor- 
mation. This may be blocked. 


Control Program Services 

Several control program services (system 
macro instructions) are used in conjunction 
with data and storage manipulations and 
program control transfers during the seven 


4 


phases of the assembler. These macros are 
briefly described in Appendix B, and detail-’” 
ed information is given in the OS Supervisor 
Services and Macro Instructions, and the OS 


| Data Management Macro Instructions, publi-- 


cations. The macros used are DCB, GET, 
PUT, READ, WRITE, CHECK, NOTE, POINT, 
GETMAIN, FREEMAIN, FIND, OPEN, CLOSE, 
CLOSE (Type T=TCLOSE), LINK, XCTL, and 
RETURN. 


Data management services are given in 
Table 3. System overhead estimates are 
given in Appendix C. 


ORGANIZATION OF THE ASSEMBLER 


Major Components 


The assembler consists of the modules listed 
in Table 4. 


Basic Functions 


The assembler has two major functions in the 
processing of source programs: generation 
and assembly. See Figure 3. | 

The function of the generator portion is 
conditional assembly and expansion of macro 
instructions to one-for-one statements. 
Phases Fl, F2, and F3 comprises the generator 
portion. 

The functions of the assembly portion is 
to convert the one-for-one source statement 
and expanded macro instructions into ma- 
chine language instructions and constants 
and to produce a relocatable object program. 
These functions are performed by Phases F7, 
FI, F8, and FPP. (There are no F4, F5, or 
F6 phases.) 

ASM is the master root segment for calling 
routines and initialization procedures. 

MAC contains and initializes the following 
I/O control program routines for Phases Fl, 
F2, and F3. 


@ READ, WRITE, CHECK, NOTE, 
the three work files. 


and POINT for 


@ GET for SYSIN. 


MAC is LINKed for ASM. See Flowchart l. 


MAC in turn LINKs to Phase Fl. MAC remains 
resident during Phase Fl, F2, and F3. It 
is later overlaid by RTA. 


Control is transferred from MAC to RTA. 

RTA contains and initializes the control 
table for Phases F7, FI, F8, and FPP. RTA 
then LINKS to Phase F7 and remains resident 
during Phases F7, FI, F8, and FPP. Upon 
completion of the final assembler phase 
(Phase FPP), control is returned to RTA. 
RTA returns control to ASM. 


There are two error. abort phases -- F3E 
and ERR. 


eTable 3. 


Use of Data Management Services 


SYSUT 1 


WRITE 
CHECK 
TCLOSE 


READ 
WRITE 
CHECK 
| TCLOSE 


READ 
CHECK 
TCLOSE 


READ 
WRITE 
CHECK 
TCLOSE 


CLOSE 


CLOSE 





SYSUT 2 


OPEN OPEN OPEN 
GET 


READ 
WRITE 
NOTE 
POINT 
CHECK 
TCLOSE 


WRITE 
CHECK 
TCLOSE 


READ 
WRITE 
CHECK 
TCLOSE 


READ 
CHECK 
TCLOSE 


READ 
WRITE 
CHECK 
TCLOSE 
CLOSE 


CLOSE 


Data Sets 


SYSIN SYSPRINT | SYSPUNCH | SYSGO 


OPEN OPEN 
PUT 
OPEN PUT 
PUT 
a 


SY SUT3 


SY SLIB SYSTERM 


WRITE 
NOTE 
POINT 
CHECK 
TCLOSE 





ma?) 
“3 7 
= 


; a 
PUT PUT. 
CLOSE CLOSE CLOSE 


OPEN CLOSE CLOSE 
CLOSE | 
PUT 


CLOSE 
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eTable 4. Organization of the Assembler 


| Asm | 1euAsM | Master root segment 
p MAC [EUMAC Macro generator |/O package 
1EUF 


JIEUF2 Macro generator syntactical scan 
JEUF2A Macro generator dictionary routines 


ASM 
MAC 

FI 

F2 

F3 IEUFS 
F3E 

RTA 

F7 

FI 

F8 


Root segment A phase 
Symbol table routine | 
Log error routine 


1EUF7 S* 
|EUF7L™ 


Initialization and 1/O 

Main line control 

GET statement 

TESTRAN routine 

External symbol dictionary routine 
DC evaluation 

Expression evaluation routine 


DC GET routine 





JEURTA 


FPP JEUFPP Post processor 
IEUFD _ Diagnostic list 


ERR IEUERR 


|EUF3E Phase F3 substitute for abort conditions 


JEUFI Interlude phase 


IEUF8I 
JEUF8C 
|IEUF8M 
JIEUF8A 
|EUF8P 
|IEUF8D 
JEUF8N 


Initilization and 1/O 

Main line control 

Machine operation processor 
Assembler operation processor 
Print routine 

DC evaluation 

Decimal/floating point conversion 
Expression evaluation routine 
Symbol table routine 

Log error routine 


JIEUF8V 
IEUF8S 
[EUF8L 





Permanent |/O error abort phase 


* A routine that logically belongs to Phase F7, but resides in the 
module IEURTA, 


Macro Generation and Conditional Assembly 
Phases 


The macro generation and conditional assem- 
bly portion of the assembler requires three 
phases (Fl, F2, and F3) and two passes over 
the source program text. 

The function of the first pass (in Phase 
F2) is to scan the source text, determine 
the syntax of each statement, and produce 
edited text suitable for actual macro gen- 
eration and conditional assembly. 

Variable symbols, sequence symbols, 
macro names, and symbols appearing in the 
main portion of the program are collected 
and placed in either a global dictionary 


or in one of the local dictionaries, de- 
pending on the type of the symbol and the 
context. Extraneous information is re- 
moved from these dictionaries, and a sub- 
setted dictionary is produced for the main 
portion of the program, for each system and 
programmer macro used in it, and for global 
information. 

The second pass (in Phase F3) performs 
the actual macro generation and conditional 
assembly using the edited source text and 
subsetted dictionary information created 
during the first pass. A one-for-one edited 
text version is produced for input to the 
subsequent assembly phases. 


Phase Fl (Initialization and Assignment). 


Phase Fl performs the primary initialization 
for the macro generation and assembly phases. 
The operating environment is established by 
obtaining data sets from the control program 
for utility, input, and library functions, 
and by obtaining main storage for tables, 
etc. 


Phase F2 (Statement Scan). Phase F2 scans 
for programmer macro definitions, the main 
program, and system macro definitions and 
produces edited text for the main portion 

of the program and for each macro definition 
for input to Phase F3. Phase F2 creates 

the global and local dictionaries and pre- 
pares subsetted versions of them for Phase 
F3. Syntactic errors are detected and flagged 
for subsequent error processing. £f£ an 
abort condition arises, Phase F2 passes con- 
trol to Phase F3E, a substitute version of 
Phase F3. An abort condition can be caused 
by any one of the following: 


@e The global dictionary fills up. 


e The local dictionary exceeds 64K bytes on 
the overflow file or in core. 


e The subsetting area is too small. 


Phase F3 (Conditional Assembly and Macro 


Generation). Using the edited text and 
dictionaries produced in Phase F2, Phase 
F3 generates one-for-one statements in 
edited text form from the macro definitions 
and performs conditional assembly. This 
output serves as input to Phase F7, the 
first of the assembly phases. 


Assembly Phases 


Phase F7 (Initial Assembly). Phase F7 pro- 
cesses symbols and literals, builds the sym- 
bol table and the external symbol dictionary, 
and assigns relative locations to all state- 
ments in the text. The symbol table con- 
tains the definition (name and attributes) 

of every declared symbol. Sharing the same 
storage area, Similar information is col- 
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Macro Generator Phases 


Figure 3. Program Flow 


lected for literals. Only one symbol table 
is constructed if the allocated core can 
accommodate the entire table. If necessary, 
the external symbol dictionary, except for 
two segments, will be stored on SYSUT3 to 
make room in core for the symbol table. If 
there is still not enough core, construction 
of the symbol table is suspended at the over- 
flow point, and all input statements are 
processed with data from the table (when 
applicable). This symbol table is then dis- 
carded and a new symbol table is built with 
symbols and literals that were not included 
in the eliminated table. This procedure is 
repeated as long as overflow conditions 
arise. Each completed symbol table is fully 
utilized and eliminated before the next one 
is built. Expressions appearing in all 
statements which require previous definition 
are evaluated in the process of location 
assignment, and a table of cross-reference 
entries is built for all symbols which are 
defined and/or referenced. 


Phase FI (Interlude). Phase FI writes the 
external symbol dictionary on data sets 
SYSPRINT and SYSPUNCH and/or SYSGO, and 
constructs the literal adjustment table 
for use in Phase F8. If the external 


RETURN 


RETURN 





¢ ¢ 


? 


Assembler Phases 


symbol dictionary was written on SYSUT3 
during Phase F7 because of excessive core 
occupancy by the symbol table, the entire 
external symbol dictionary is read back 
into main storage. 


Phase F8 (Final Assembly). Phase F8 com- 
pletes the symbol processing on all oper- 


ands using the last (or only) symbol table 
created in Phase F7. USING tables and the 
relocation dictionary are built, all ad- 
dress expressions are evaluated, and the 
operand addresses are converted to base- 
displacement format. Finally, the assembled 
text is written in relocatable object progral 
format on SYSPUNCH and/or SYSGO and in pro- 
gram listing format on SYSPRINT. 


Phase FPP (Post Processor). Phase FPP for- 
mats and writes the relocation dictionary 
table. If requested, the cross-reference 
entries are sorted, and the cross-reference 
list is prepared and written. Diagnostic 
messages and statistics are prepared and 
written on SYSPRINT, and diagnostic informa- 
tion is prepared and written on SYSTERM. 
Phase FPP also writes the END card. 
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PROGRAM ORGANIZATION 


PROGRAM LEVELS 


In order to establish a uniform method of 
communication and to control flow between 
the phases and phase routines, the assem- 
bler is structured on three levels: 


e Level O - Phase initialization, storage 
allocation, mainline control, 
phase call, and Operating 
System interface. 


@e Level 1 — Functional routines. 


e Level 2 -— Common subroutines and common 
tables. 


Functional routines are assembled as 
independent control sections with a single 
entry point and a return to mainline con- 
trol. Functional routines do not call 
Other level 1 routines. Any communication 
required between functional routines is 
through mainline control and the common 
table area. 

Common subroutines are also assembled a 
independent control sections. Linkage 
between functional routines and common sub- 
routines as described in Linkage Conven- 
tions below. 


ASSEMBLER CONTROL TABLE 


Linkage between mainline control, function- 
al routine, common subroutines, and common 
tables is accomplished through the use of 
the assembler control table. The location 
of the assembler control table is always 
available to all levels of routines and sub- 
routines through the general purpose regis- 
ter ACT. 

The assembler 
into five parts: 


control table is divided 


- 
® 


Mainline control/functional routine 
linkage/return algorithms. 
Functional routine pointers. 

Common subroutine pointers. 

Common table pointers. 

Switches 


U1 iB W bo 
e @ 6 


Each of these five sections is ina fix- 
ed location with respect to the ACT pointer, 
and each element in a given section is in a 
fixed location with respect to the start of 
that section. A central dimensioning deck 
of EQU cards is used by each control sec- 
tion to reference the assembler control 
table symbolically. 


Example: 

ACT EQU (General register number for 
assembler control table 
pointer) | 

CTL EQU 0 | 

CT2 EQU Relative location of section 
2 

CT3 EQU Relative location of section 
3 

CT4 EQU Relative Location of section 
4. 

CT5 EQU Relative location of section 
5 


GENERAL REGISTER ASSIGNMENTS 


General registers 3-15 are referenced sym- 
bolically by all assembler subprograms. 

The equate cards are described in Table 5 
and in the paragraphs below. They are in- 
cluded in all control section decks to pro- 
vide the initial assignments for general 
register symbols. 


ACT (Assembler Control Table) Pointer 


This general register contains the absolute 
starting location for the assembler control 
table. This register is set by the control 
routine during phase initialization and re- 
Mains set for the duration of the phase. 
ACT should be considered as a read-only 
register for the use of all routines and 
subroutines and as a base register for as- 
sembler control table references. 


FRB (Functional Routine Base Register) 


This general register contains the base 
address for the current functional routine. 
FRB is set by the control routine and is 
used to link with functional routines. The 
USING statement for each functional routine 
uses FRB as the second operand and the name 
of the functional routine’s entry point as 


the first operand. 


Example: 


USING BEGIN, FRB 


FRB should not be used by common subroutines 
or by functional routines other than in 
their USING statements. Functional routines 


Table 5. General Register Assignments 


Tentative 
Symbol EQU Purpose 
GRO . 
GRl, Absolute None 
GR2 


was 


Common subroutine 
parameter | 
Common seproutine 
parameter 2 


General purpose 
| Sener Y, and 
Z, respectively 


Assembler control 
table pointer 









Read only register 






Common subroutine 
base register 






USING statement 












Common subroutine 
return register 


SRB 









No restrictions, 











General purpose 
register A, B, C, and 
D, respectively, 






Functional routine 
base register 










Control routine base 
register 


Control routine 
return address 


Restrictions 





Set by calling routine. Used by S/R in 


Set by calling routine with BALR, SRR, 


Used to transfer parameters between calling 
routine and common subroutines 


Completely volatile. 


Used by functional routines. 
changed by common subroutines, 


Set by control routine, 
routines in USING statement, 


Used by functional 


Saved/restored by control routine when 
control is passed to functional routine 


Remarks 











Four contiguous regis- 
ters beginning with an 
even register 
























GRX and GRY are 
two contiguous registers 
beginning with an even 
register, GRZ is un- 

predictable, 













Cannot be Four contiguous registers 
beginning with an even 


‘register 










(Sample applications) 





*CRB and CRR are applications of the usage of general purpose registers for specific assignments. 


do not link directly with other functional 
routines. Therefore, FRB remains intact 
during the operation of a functional rou- 
tine. 


SRB* (Subroutine Base Address) 


This general register contains the base 
address for the current common subroutine. 
SRB is set by the calling routine and is 
used to link with common subroutines. The 
USING statement for each common subroutine 
uses SRB as the second operand and the name 
of the subroutine's entry point as the 
first operand. 


*SRB, SRR, SPI, 


Example: 


USING SRENTR,SRB 


SRR* (Subroutine Return Address) 


This general register contains the address 


through which the current common subroutine 


and SP2 may be used as gen- 
eral purpose registers by level O and level 
1 routines if care is taken not to conflict 
with subroutine calls. If a subroutine 
calls another subroutine, it is the respon- 
sibility of the first subroutine to restore 
SRB and SRR. 
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returns to the calling routine. SRR is 
set by the calling routine with a BALR 


SP1*, SP2* (Subroutine Parameters) 

These general registers are used to trans- 
fer parameter(s) between the calling routine 
and the called subroutine. SP1l and SP2 are 
two contiguous registers beginning with an 
even register. If a parameter list exceeds 
the combined length of SP1 and SP2, SPl is 
used aS a pointer to the parameter list 
storage location. 


GRX, GRY, GRZ (General Purpose Registers) 


There are no restrictions on the use of 
these general registers. They may be used 
by any level routine and are not saved/ 
restored by called subroutines and operat- 
ing system functions. 


GRA, GRB, GRC, GRD (Functional Routine 


General Purpose Registers) 


These are four contiguous registers begin- 
ning with an even numbered register. Some 
subroutines could use these registers and 
restore them to their original value before 
returning to the calling routine. The con- 
trol routine is required to save and re- 
store these registers for its own use when 
transferring control to a functional rou- 
tine. 


LINKAGE CONVENTIONS 


Subroutine Linkage 


Common subroutines are linked to the main- 
line control and functional routines 
through the following procedure: 


e The calling routine loads parameters in- 
to SPl and SP2. If the parameter list 
exceeds two words in length, a pointer 
is used in SPl or SP2 to point to the 
storage location of the parameter list. 


e The calling routine loads the address of 
the subroutines in SRB. The subroutine 
address constants (ADCONs) are located 
in the assembler control table. 

Example: 


L SRB , SUBAD (ACT) 
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e The calling routine transfers control to 
the address specified by SRB, storing 
the return address into SRR. 


Example: 


BALR SRR,SRB 


@e The called subroutine returns control to 
the calling routine by branching to the 
address specified by SRR. 


Example: 
BR SRR 


NOTE: If a common subroutine calls another 
common subroutine, the same procedure will 
be used. Therefore, it is necessary for 
the first subroutine to save and restore 
its own base and return registers. 


Example: 


CALLING ROUTINE 


L SRB ,SUB1(ACT) 
BALR SRR SRO? ets ee aa 


ge eee Me 
Z / 
/ ge 
PO eee 
/ sen — 
| / 
j / 
| SUBROUTINE 1 
a USING — SRI,SRB 
~m SR STM SRB, SRR, SAVE 
\ L SRB, SUB2(ACT) 
} BALR SRR,SRBo 
* USING — *,SRR ~ 
\ _---—s IM SRB SRR, SAVE 7 
“ Pa DROP SRR \ 
\ 7 COMPUTE \ 
\Z BR SRR —T\ 
I. SAVE DS 2F | 
/ ‘“\ / / 
| el 7 / 
| Pd. a Pi V4 
~ - Sf 
| TT ing SSS cca —_ — en 
\ terete: 
\ es 
\ 7 
\ 7 
* : SUBROUTINE 2 
\ \ 
Xe | M™sR2 USING  SR2,SRB 
\ COMPUTE 
“ BR SRR 
~~ \ 
~ 
~ i 
= ~ a 


Common Table Linkage 


All tables and data areas used by more than 
one routine or subroutine are considered a 


common table and follow the rules defined 
herein. 

The starting location of each common 
table is contained in the assembler control 
table. Therefore, any reference to common 
control tables is preceded by loading the 
starting address for that table into a gen- 
eral register from the assembler control 
table. 

Fields within common tables are refer- 
enced symbolically. 


Example: 


The starting location for TABLE is con- 
tained in ACT+56. TABLE consists of N 
entries. Each entry consists of three 
fields: FIELDA (2 bytes), FIELDB (1 
byte), and FIELDC (5 bytes). 

The dimensioning deck required to 
reference TABLE is as follows: 


TABLE EQU 56 (Rel. loc. of TABLE 
pointer in ACT) 
FIELDA EQU 0 (Rel. loc, of FIELDA 
in TABLE entry) 
FIELDB EQU 2 (Rel. loc. of FIELDB 
in TABLE entry) 
FIELDC EQU 3 (Rel. loc. of FIELDC 


in TABLE entry) 


In the following sample coding, X is 
the register containing the TABLE point- 


er. 

L X, TABLE (ACT) 

MVC FIELDA(2,X) , TEMP 

MVC FIELDB(1,X) ,FIELDA+1 (X) 


Linkage Between Mainline Control and Func- 
tional Routines 


The mainline control routine transfers con- 
trol to the functional routines by loading 
the functional routine base address into 

FRB from a table of pointers in the assem- 


bler control table. An algorithm in the 
assembler control table then saves the main- 
line control base and return registers, and 
branches to the functional routine pointed 
to by FRB. 

The functional routine returns control 
to mainline control by branching to the 
return algorithm in the assembler control 
table. The return algorithm restores the 
mainline control base and return registers, 
and returns to mainline control. 


Example: 
MAIN LINE CONTROL 


L FRB ,FROUTI(ACT) 

BALR CRR, ACT 
COMPUTE ; 
y / 

/ / 

; / 
/ [ 
j ‘ LINKAGE ALGORITHM 
\ 
/ “ASTM CRB, CRR,SAVE(ACT) 
BR Ss ERB 


meen 


RETURN ALGORITHM 


- CTRTRN LM CRB, CRR, SAVE(ACT) / 
: 4 BR CRR / 


| 
Si 7 - 
ie = 7 


FUNCTIONAL ROUTINE 


\ 4 USING — ENTER,FRB 
\ | ENTER 
‘ COMPUTE 
NL EXIT B CTRTN(ACT) 
a” 


~~ —_ 
SSP ee eee ee oe 


Program Organization 11 


DICTIONARY AND TABLE CONSTRUCTION TECHNIQUES 


GENERAL 


The assembler builds dictionaries and tables 
for its own use. Special facilities are 
used to enter new records and to access 
already stored records for adding or re- 
trieving data in these designated areas. 
Hash tables, hashing algorithm, and chain- 
ing are the tools employed to accomplish 

the required data manipulations in diction- 
aries and certain tables. 


DICTIONARY TYPES AND STRUCTURES 


The assembler uses two types of diction- 
aries: a global (permanent) dictionary 
and a local (transient) dictionary. See 
Figure 4. | 


Global Dictionary 


Machine operation codes 






Assembler operation codes 
Macro names*——> (NOTE/POINTs) 
Global SET symbols 


Local Dictionary 


Sequence symbols <—»=(NOTE/POINTs) 


Ordinary symbols 


Local SET symbols. 


Symbolic parameters 





Figure 4. Dictionary Structure 


There is only one global dictionary. It. 
is core resident, and it contains all 
machine and assembler operation codes, all 
macro names, and all global SET variables. 

There are many local dictionaries, one 
for each macro definition and one for open 
code (main text). The local dictionaries 
contain sequence symbols, ordinary symbols, 
local SET symbols, and macro instruction 
parameters. Local dictionaries contain 
items needed for insertion into edited text 
and for macro generation during Phase F3, 
and can overflow onto a utility data set 
during construction. 

Each local macro dictionary is subsetted 
at the end of the processing of the macro 
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entry in the proper string. 


definition (Phase F2). The subsetted 
dictionary is written on the system utility 
data set immediately following the edited 
text format of the macro definition. 

The global and the open code local dic- 
tionaries are subsetted at the end of Phase 
F2. Subsetting removes flag bytes, symbolic 
names, big "A" pointers, and little "a" 
pointers. The global and main text local 
dictionaries are placed in core and remain 
there throughout Phase F3. 


SYMBOL TABLE STRUCTURE 


The symbol table is a collection of the 
attributes of symbols and literals. It is 
actually composed of two tables, one for 
symbols and one for literals; however, the 
same physical storage area is used for both 
and the two different types of entries are 
intermingled in storage. 

The symbol table is a compact means to 
rapidly obtain the attributes of a given 
symbol or literal. The techniques used to 
store and retrieve symbol table information 
are hashing and chaining. 

The symbol table is always in core and 
it consists of the symbol table proper and 
two hash tables, one for symbols and one 
for literals. The external symbol dictionary 
occupies the high-numbered portion of the 
alloted storage, but is output on a data 
set if the space is needed by the symbol 
table. 

The symbol hash entries are three-byte 
addresses whose locations are obtained 
from the symbol names. Different names 
may have the same hash entry. If so, 
the entry points to the last synonym 
entered, which has a chain pointer to the 
preceding one. Literal entries are 
referenced through a literal hash table 
which contains a three-byte pointer for 
each of four literal strings. There is 
a literal string for each of the literal 
lengths of 1, 2, 4, and 8 bytes. Each 
literal hash pointer points to the first 
The entries 
in each string are chained together ina 
forward manner. (See Hash Table and 
Chaining, below.) 


HASH TABLE 


A hash table is used by the assembler for 
inserting or locating variable or fixed- 
length record entries in dictionaries and 
symbol tables. A hash table consists of 
fixed-length address entries (called point- 


ers) which point to locations in the dic- 
tionaries/tables. The range of the hash 
table is the number of such pointers that 
can be placed in the space reserved for the 
table. When it is desired to make an entry 
in the dictionary/table, e.g., enter a 
global 
try in the dictionary/table, e.g., to ob- 
tain the relative address of a symbol, the 
associated symbol or other datum must first 
be randomized to produce an index number. 
This is called hashing. (Operation codes 
are included in the generation of index 
numbers for the macro dictionaries.) The 
randomizing algorithm is such that the re- 
sulting index number will be a whole number 
between zero and the hash table range, 
minus one. This index number is then used 
to index into the hash table and inspect 
the associated pointer (address entry) in 
the hash table. This entry will be Zero 
until a record entry, randomiZing to this 
index number, has been entered in the 
dictionary/table. Records are entered in 
the dictionary/table sequentially, and a 
dictionary/table pointer, containing the 
next available address, is used for in- 
serting new records. Several different 
data (called synonyms) may randomize to the 
same index number. Because this index num- 
ber points to an associated entry in the 
hash table where only one address can be 
stored, chaining must be used to enter or 
locate the synonym records. 


CHAINING 


Chaining is a technique whereby an entry 
to one record points to the next record, 
and so on. Forward chaining and backward 
chaining are the two types of chaining 
used by the assembler. | 
In forward chaining, a hash table pointer 
entry points to the first entry of a chain. 
The first field of each entry contains a 
chaining address pointing to the next entry 
in the chain. The last entry in each chain 
has all zeros in the chaining address field. 
In backward chaining, a hash table point- 
er entry points to the last entry of a 
chain. The first field of each entry con- 
tains a chaining address pointing to the 
preceding entry in the chain. The first 
entry in each chain has all zeros in the 
chaining address field, or, in certain 
applications, the pointer field is 
eliminated in the first entry. 


Forward Chaining Techniques 


The symbol, literal, or other datum whose 
record is to be entered is hashed to obtain 
an index number. This number is used to 
point to the associated address entry in 
the hash table. The hash table entry will 
be zero if no other item has yet hashed to 
the same index number, i.e., this is the 
first record entry for this index number. 


symbol declaration, or to locate an en- 


dictionary/table pointer, 


If this is not the first entry to this 
index number, the hash table will contain 
the address of the first record entered in 
this chain. The record at that address 
will be checked for duplication. If there 
is no duplication, the content of the chain 
pointer field is checked in the record. This 
pointer will be either a chaining address 
pointing to the location of the next record 
in the chain, or zero. Zero indicates that 
this is the last (or only) record in the 
chain. If the pointer field contains a 
chaining address, the next record is check- 
ed for duplication. Again, if there is no 
duplication, it is checked for a zero chain 
pointer (zero=last record in the chain). 
The scan is continued in this manner until 
a Guplication is found, when the precedure 
is terminated without making a new entry, 
or until a zero pointer is reached, in 
which case the new record is entered in 

the dictionary/table. In the latter case, 
the zero pointer is replaced with the 
address of the dictionary/table pointer, 
i.e., the address of the next available 
dictionary/table location, the new record 
is entered at this location with a zero 
pointer, and the dictionary/table pointer 
is updated with the length of the current 
entry. 

The procedure used to locate records in 
the dictionaries/tables is the same as 
entering, except that when the compared 
records are equal, the pertinent informa- 
tion is extracted, or the value informa- 
tion is inserted, as the case may be. See. 
Figure 5. 


Backward Chaining Techniques 


The record to be entered is hashed to an 
index number. This index number is used 
to point to an associated address in the 
hash table. The hash table entry will be 
zero if no other record has yet hashed to 
this index number. If this is not the 
first entry, the hash table will contain 
the address of the last record entered, 
i.e., the most current entry. The record 
at this address will be checked for dupli- 
cation. If there is no duplication, the 
content of the record's chain pointer field 
is checked. This chain pointer field con- 
tains the address of ‘the previous entry in 
the chain, or zero, if it is the first (or 
only) entry in the chain. 

The chain is scanned starting with the 
last entry and continuing through the 
first entry, or until a duplicate record 
is encountered. In the latter case, the 
scan is terminated and the record is not 
entered. If there is no duplication, the 
address of the last record in the chain is 
placed in the chaining address field of 
the record entered. The address of the 
i.e., the address 
of the next available location in the 
dictionary/table area, replaces the pointer 
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in the hash table, and the record is in- 
serted at this address in the dictionary/ 
table. 

The dictionary/table pointer is updated 
by the length of the record just stored to 
indicate the new available storage address. 

The procedure to locate records in the 
dictionaries/tables is the same as enter- 
ing, except that when the compared records 
are equal, the pertinent information is 
extracted, or the value information is 


hashed 


Chaining Usage 


In Phase F2, forward chaining is used in 
building the global dictionary. However, 
in addition to the many forward chains 
created, all macro name entries in the 
global dictionary are linked together 

by backward chaining. Therefore, each 
macro entry has two pointer fields. The 
first field points forward to the next 
record in the chain, which originated 
from the same hash table pointer, and the 
last field points backward to the 


SYMBOL = "IDENTIFY" Se NED NUMBER = 5 


inserted, as the case may be. See Fig- 
ure 6. 
Dictionary/Table Pointer 
DEF 
HASH TABLE 





AAA 


Figure 5. Hash Table and Forward Chaining 


14 


| 000 Third Record 


hashed 
‘SYMBOL = "IDENTIFY" -———e» INDEX NUMBER = 5 


to 







Dictionary/Table Pointer 


DEF 


HASH TABLE 





Figure 6. Hash Table and Backward Chaining 


preceding macro entry in the macro chain. in a random fashion. Symbol entries are 

The first macro entry in the macro chain reached through pointers located in: the 

has a zero macro chain pointer. symbol hash table and are chained back- 
Backward chaining is also used in Phase wards. The first symbol entry has no 

F2 to build local dictionaries. pointer field. Literal entries are reached 
In Phases F7 and F8, the symbol table through the literal hash table and are 

area is shared by symbols and literals chained forward. 
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PHASE Fl - INITIALIZATION AND ASSIGNMENT 


OVERALL OPERATION (FLOWCHART 2) 


Phase Fl performs initialization for Phase 
F2. Phase Fl does a GETMAIN for needed 
common area, and from this determines an 
optimum buffer size. Phase Fl generates a 
hash table and associated global dictionary. 
Machine operation codes and assembler oper- 
ation codes are inserted into the global 
dictionary at this time. 


FUNCTIONS 


The first five data sets, SYSIN, SYSLIB, 
SYSUT1L, SYSUT2, and SYSUT3, are opened. 
See Figure 7. The assignments of the 
three utility data sets within the assem- 
bler are influenced by the channel config- 
uration and device types. The parameter 
list on the EXEC card is scanned and proc- 
essed for reference by subsequent phases. 
Any errors are diagnosed. 

Phase Fl reads the first card and, 
card is not an ICTL or OPSYN card, 
to Phase F2. 


it XCTLS 
If it encounters an ICTL or 
OPSYN card, it first processes all ICTL and 
OPSYN cards. When it reads a record that is 
not an ICTL or OPSYN instruction, it trans- 
fers control to Phase F2. 


SUBROUTINES 
ICTL 


Sets the input control values as specified 
in the ICTL instruction. 
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if that 


foray 
* Phases 
FI/F2 


SY SLIB 


I/O Flow for Phases Fl and F2 


Bol. 


Figure 7. 


OPSYN 


This routine processes OPSYN definitions. 
If the symbol in the name field is not an 
existing operation code (valid for OPSYN), 
the routine creates a global dictionary 
entry -- identical to the entry for the 
Operation code in the operand field -- and 
hashes it on a chain for OPSYN-defined op 
codes. If the name is an existing op code, 
the routine changes the internal machine 
operation code and (if required) the type 
code and ASC to that of the op code in the 
operand field. If the op code is to be 
removed (blank operand field), the routine 
zeros out the first byte of the op code 
name in its global dictionary entry. 


OVERALL OPERATION (FLOWCHARTS 3-7) 


This phase performs all necessary functions 
to enable conditional assembly by the next 
phase, F3. It reads the input from SYSIN 
and performs a syntactical scan of all the 
input. See Figure 7. Any undefined opera- 
tion codes are assumed to be system macro 
instructions. (If the DOS assembler option 
is specified, F2 treats CXD, DXD, and OPSYN 
instructions as undefined. It also treats 
L-type and Q-type DC and DS instructions 
and extended precision machine instructions 
as undefined.) A search of the system 
library is made and the system macros are 
edited just as are programmer macros. In 
addition to scanning, Phase F2 inserts 
various items into appropriate dictionaries. 

Items present in the dictionaries are 
needed for insertion into edited text and 
generation by Phase F3. 

When a dictionary is complete, it is 
subsetted and all items except those needed 
by Phase F3 are deleted. 


FUNCTIONS 


Phase F2 is divided into the following four 
logical sections: 


@ Programmer macro definition scan and 
dictionary build. 


@ Main text scan and dictionary build. 


@® System macro definition scan and 
dictionary build. 


@® Subsetting of the global dictionary and 
all local dictionaries. 


Because these sections have many overlap- 
ping functions, they are contained in a 
Single phase. | 


Programmer Macro Definition Scan and 
Dictionary Build 


Source text is read from SYSIN and option- 
ally from SYSLIB (using FIND) if COPY 
assembler instructions are encountered in 
the macro definitions. A copy of the 
source text is written on SYSUT1 for later 
inclusion in the SYSPRINT data set, while 
edited text is written on SYSUT3. 

A chaining technique is used to make 
entries in the dictionaries. (See Chain- 
ing Techniques in the Dictionary and Table 
Construction Techniques section.) As the 
source text is scanned, entries are made in 
the global dictionary for macro mnemonics 
and global SET symbols. Entries are made 
in the local dictionary corresponding to 
the given macro for sequence symbols, | 
parameters, and local variable symbols. 
Segments of the given local dictionary are 
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written on SYSUT2, and the macro definition 
in an edited text format is written on 
SYSUT3. When the end of the given macro 
definition is encountered, the local dic- 
tionary for that macro is subsetted and 
written on SYSUT3 immediately following the 
corresponding edited text. 


Main Text Scan and Dictionary Build 


Source text is read from SYSIN and option- 
ally from SYSLIB (using FIND) if COPY 
assembler instructions are present. The 
source text of the main portion of the pro- 
gram is combined with an edited form of the 
main text and written on SYSUT1L. This text 
is blocked to minimize rotational delay 
timing problems inherent with DASD devices. 

A hashing technique is used to enter in- 
formation in the dictionaries. (See Hash 
Tables in the Dictionary and Table Construc- 
tion Techniques Section.) The same global 
dictionary used in the programmer macro 
definition scan is used in the main text 
scan to contain macro names, OPSYN defini- 
tions and global SET variables. The local 
dictionary for the main text is used to 
store main text symbols as well as local 
variable symbols and sequence symbols. 
Segments’ of this local dictionary are 
written on SYSUT2. A circular buffer pool 
is employed with a backward chaining tech- 
nigue to keep as many of the most recently 
written local dictionary segments in main 
storage as possible. However, for large 
programs it may be necessary to read back 
one of the segments no longer remaining in 
main storage. Further, the boundary between 
the global dictionary and the current local 
dictionary may be adjusted to permit a 
larger number of global dictionary entries, 
thereby reducing the main storage for the 
local dictionary and possibly requiring 
more segments to be read back. 





System | Macro Definition Scan and Dictionary 


Build 


The global mnemonics dictionary contains 
mnemonics of macros used in the programmer 
macro definitions and in the main text of 
the program. Mnemonics of macros which 
were not defined as programmer macros are 
chained together and considered to be sys- 
tem macros. One by one these macros are 
located in SYSLIB (using FIND), and their 
definitions are scanned and edited similar 
to the programmer macro definitions above. 
Text is read from SYSLIB. Since no listing 
of system macro definitions is required, _ 
only the edited text and subsetted local 
dictionaries are written (on SYSUT3). 
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Entries are made in the global dic- 
tionary for macro mnemonics and global SET 
symbols, and for each system macro defini- 
tion a local dictionary is created in which 
sequence symbols, parameters, and local 
variable symbols are entered. As in the 
case of programmer macro definitions, each 
local dictionary is subsetted to form a 
macro dictionary, which is written on 
SYSUT3 immediately following the edited 
text for the macro. 

This process continues until all system 
macro definitions have been processed or 
until no more macro names can be located in 
the library, at which time undefined macros 
are treated as illegal instructions. 


Global Dictionary and Main Text Local 
Dictionary Subsetting 


After editing all text preparatory to the 
actual conditional assembly and macro gen- 
eration, the global dictionary is subsetted 
and placed in main storage. The main text 
local dictionary is then subsetted and also 
placed in main storage. 


GLOBAL DICTIONARY ENTRY FORMATS 
Defined Operation Codes 


This format is as follows: 






Bytes 2 l 1 to 8 l 1 l 
"AN F| Mnemonic Internal Machine] py 
pointer ay Operaticn or Assembler Mask | ASC 
Operation Coue 





Code 


"A" Pointer (big A pointer) Relative 
forward chaining address of the next 
consecutive entry in a dictionary chain. 


Flag - 
Bit 0 Not used 
Bits 1-4 0000 - Normal machine op 
0001 - Assembler op 
0010 - Extended mnemonics 
Bits 5-7 Length of operation code minus 


one (L-1) 

Rl Mask - Rl field for extended mnemonics. 
The extension of op codes field is 
omitted for machine operation code 
entries. For two-byte op codes in 
System/370 instructions, the second 
half of this byte contains the dis- 
placement into the table TASTABLE. 
This table is internal to IEUF8M 
and contains the second byte of 
two-byte codes. 


ASC - Assembler switch code. (See Edited 
Text Record Fixed Field Format in the 
"Phase F7" section.) 


Macro Name Entry 


This format is as follows: 
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Bytes 2 ] 1] to 8 2 


3 2 
WAt Wg NOTE/ MCP | 
pointer | Flag Mnemonic pointer POINT 


"A" Pointer - Forward chaining address 





Flag - 
Bit 0 O - Normal global variables. 
1 - Obsolete global variables 

(global variables which have 
been declared apart from the 
current part of the source 
deck being processed, such 
as macro definition or main- 
line program). 


NOTE: Bit zero is used for global vari- 
ables only. 
Bits 1-4 0000 - Op codes 
0001 - Internal Assembler op codes 
0010 — Extended mnemonics 
0011 - Macro names 
0100 - Global A variables 
0101 - Global B variables 
0110 - Global C variables 
Bits 5-7 Length of BCD entry minus one 


(L-1) 
Mnemonic - The macro name in byte format. 


"a" Pointer - Little "a" pointer to a loca- 
tion in the Phase F3 dictionary that will 
contain the subsetted entry for this 
mnemonic. 


NOTE/POINT - NOTE/POINT Address. Before 
the dictionary associated with this 
mnemonic is subsetted, this entry will 
contain the NOTE location of the begin- 
ning of the fully edited text for the 
corresponding macro definition. After 
the local dictionary has been subsetted, 
this field contains the NOTEd location 
of the subset dictionary, which will in 
turn contain the NOTEd position of the 
fully-edited text of the macro defini- 
tion. 


MCP - Macro chain pointer. The backwards 
chaining address of the preceding macro 
name entry in the dictionary. 


Global SET Variable Symbol Entry 


This format is as follows: 


Bytes 2 


" A" 
pointer Fl 


2to8 


1 2 2 
SET M1 a" 
ag variable pointer Cc 
symbol 





"A" Pointer - Forward chaining address. 
Flag - Same as in the macro name entry. 


SET Variable Symbol - The SET Vanieole sym- 
bol in byte format. 


"a" Pointer - Same as in the macro name 
entry. 


the declared SET variable 
This will be zero if un- 


C - Dimension, 
dimension, 
dimensioned, 


LOCAL DICTIONARY ENTRY FORMATS 


Open Code Ordinary Symbols 


This format is as follows: 


Bytes 1 to 8 


2 1 2 2 
il A" " a! 
pointer | Flag Symbol | pointer | Type Length | Scale 


"A" Pointer (Big A pointer) — Backward 
chaining address of the preceding entry 
in a dictionary chain. 


Flag - 

Bit 0 QO - Synonym (part of a chain) 
1 - End of the chain 

Bits 1-4 1000 - Sequence symbols 
1001 - Parameters 
1010 - Ordinary Symbols 
1100 —- Local A variables 
1101 - Local B variables 
1110 - Local C variables 

Bits 5-7 Length of BCD entry minus one 


(L-1) 
Symbol - The symbol in character format. 


a" Pointer - Same as in the macro name 
entry. 


Type - Type attribute. See Table 6, 


Length - Length attribute: 


Scale - Scale attribute: 


Bit O 0 - Positive 
1 - Negative 


Bits 1-15 Scale attribute 





Table 6. 


Description of Record Type Indicator 


Source statement continuation record 


Type Indicators (Phases F2/F3) 


Error record (warning message) 


End of data set 


Error record (not warning message) 


Edited text records (machine instructions, DC, DS 
etc.) 


CSECT, DSECT, START edited text record 
AGO edited text record 

AIF edited text record 

SETx and ACTR edited text record 

Macro instruction edited text record 


Macro definition prototype statement edited text 
record 


MEXIT and MEND edited text flag record 
ANOP edited text Flag record 


Macro instruction or prototype operand value 
record 


End of macro instruction or prototype record 


Sequence Symbols 


This format is as follows: 


Bytes : 2 to 8 2 


"A" NOTE/ 


"A" Pointer - Backward chaining address. 





Flag - Same as in the open code ordinary 


symbols. 
Symbol - The symbol in character format. 


"a" Pointer - Same as,;in the macro name 
entry. 


NOTE/POINT - The pointer to the block in 
which the fully-edited text for the 
statement named by the sequence symbol 
begins. 


B - The position of the beginning of the 
sequence symbol fully-edited text 
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relative to the beginning of the block > 
in which it is located. 


Local SET Variable Symbols 


fhis format is as follows: 


Bytes 2 to 8 2 2 





"A" Pointer - Backward chaining address. 


Flag - Same as in the Cees code ordinary 


symbols. 
Symbol - The symbol in character format. 


"3s" Pointer - Same as in the macro name 
entry. 


D - The declared dimension of the local 
SET variable symbol. It will be zero if 
the symbol is undimensioned. 


Macro Prototype Symbolic Parameters. 


format is as follows: 


This 


Bytes 2 to 8 





This format is for both keyword and posi- 
tional type. 


"A" Pointer - Backward chaining address. 


Flag - Same as in the open code ordinary 


symbols. 
Symbol - The symbol in character format. 
PN - The operand position number assigned 
to the symbolic parameter. 


RECORD FORMATS 


Source Record 


This format is as follows: 


Bytes 
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Type ID - 08 
R/L - Record length 


FLAGA - 
Bit O Not used. 
Bits 1-3 Record type 
OOO - Print as is. Source rec- 
ord only 

OO1L -— Error record. 

O10 - Print as is, but do not 
display a statement num- 
ber. Source record only. 

Oll - Print as is if GEN option 
is on. Steps statement 


number counter. Source 
record only 
100 - Process only. Edited 


text and logical state- 
ments only. 

101 - Internal assembler control 
record. 

110 - Process this record and 
construct source record 
for print. 

111 - Process this record and 
construct source record 
for print if GEN option 


is on. 
Bit 4 Not used. (This bit is acti- 
vated in Phase F7.) 
Bit 5 Error record follows indicator. 
Bit 6 Continuation card indicator. 
Bit 7 Not used. (This bit is acti- 


vated in Phase F7.) 


Source —- When created in F2 from source 
records from SYSIN or SYSLIB, source will 
be 80 bytes long. 


NOTE: If a source statement has a continua- 
tion card, an ERROR, and is split between 
buffers, then the order on SYSUTI1 is as 
follows: | 

@e Source record (first part). 

e Error record. 


e Source record (second part). 


e Source continue record (from continua- 
tion card). 


Source records are not created in Phase F2 
for the system macro definition source 
statements (with the exception of comments 
for generation: "*"). 

Logical Statement 


This format is as follows: 


Bytes . 3 


Fixed Portion 


Bytes @1 Variable 1 Variable Variable Variable 


Text 


Type ID - See Table 6. 
R/L — Record length. 


FLAGA — Same as in the edited text record 
fixed field format in Phase F7. 


OP Code - Hexadecimal operation code for 
machine instructions (See Appendix B 
for internal assembler instruction 
codes). 


ASC - Assembler switch codes. (Inserted in 
Phase F2 but not used by the macro gen- 
erator phase. See the edited text rec- 
ord fixed field format in Phase F7.) 


NL -—- Name length 

OPL - Operation length 
OPNL - Operand length 
COML - Comments Length 


Text - Relevant text from source record, 
all source between beginning and end 
column, and from continue to end column, 
if continuation record. All blanks, 
except one, after end of comments field 
of last (or only) source record are 
dropped. As an exception, for macro 
prototype statements, one logical state- 
ment record is made for each source 
record. The following REPRO record is 
the other exception. 


END of Statement - FFi¢ 


NOTE: Logical statement records are not 


created for ICTL, ISEQ, MACRO, COPY, or 
a 


COMMENTS statements, i.e., "*" or 


Error Record 


This format is as follows: 


Bytes ] 





Statement 


Type ID - 08 Warning message (same as 
source record) 


ODi¢ All other errors 


R/L - Record length which must be between 
000716 and O02Bi¢- 


FLAGA - Always 10 16 


Number of Errors - Always 01 46, i.e., one 


record is created for each error. 
Error Code - Type of error 


B - Always 00 j6¢ 


End of Data Set 


This format is as follows: 


Bytes 1 2 1. 


|e ve 


R/L - Record length, which must be 000416. 





FLAGA —- 0016 


Reproduction Record 


This format is as follows: 


l 2 2 | 1 3 1 \ 5 1 


—— Fixed Portion = 


Bytes 








Bytes Variable _] 


eee 


The first nine bytes of the REPRO record 
are the same as the logical statement rec- 
ord (fixed portion). 


NL - Length of name field. Always OO0j6¢6. 
(There is no name field in a REPRO in- 
struction.) 


OPL - Length of operation field. 
O546- 
Operation Field - Always "REPRO". 


Always 
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OPNL - Length of operand field. 
Olig e 


Always 


Operand field - Always blank. (There is no 
operand in a REPRO instruction.) 


COML - Length of comments field. 
Comments field. 


SL - Length of source record. Always 5016 


Source - The 80-byte source record to be 
reproduced. 


SUBROUTINES 


DRIVER 


One card is read and control is transferred 
to DRVERIL. 


DRVERL 


The name and operation field of each in- 
struction is scanned. The name field is 
indicated as defined if non-blank, Syntax 
errors are noted and, at this point, may 
abort this statement. 

If a prototype was expected, the name 
(if not already present) and SYSUT3 NOTE/ 
POINT address is entered in the global dic- 
tionary, and each parameter (name field 


included) is scanned and entered into the 
local dictionary for this macro. Edited 
text is built up during scanning. The pro- 


gram goes to the output routine ENDOPR, and 
then to DRIVER. If a prototype was not 
expected, the operation field is searched 
for in the global dictionary. If not 
found, statement sequencing is checked 
and the operation field is entered in the 
global dictionary. The statement is 
treated as a macro instruction. The name 
field and all operands are edited and 
edited text is produced. The program 
goes to ENDOPR for each operand. When 
all operands have been processed, control 
goes to DRIVER. 

If the operation code is found and is not 
an assembler operation, the statement se- 
quencing is checked. The operand field is 
scanned and put into edited text format. 
Control goes to ENDOPR. 

If the operation code is a declaration, 
the operand fields are scanned and errors 
diagnosed. Each operand is inserted into 
either the global dictionary or the local 
dictionary. Control goes to DRIVER. 

If the operation code is a SET statement, 
it is checked for statement sequencing. If£ 
valid, the "a" pointer of the variable synm- 
bol is found in the dictionary and inserted 
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into the edited text. 
ENDOPR,. 

If none of the above operation codes are 
found, the program performs a computed GO 
TO based upon the operation code. 


Control then goes to 


AIF and AGO 


The evaluation field, if present, is 
scanned and put into edited text. The "a" 
pointer of the sequence symbol is inserted 
into the edited text formats. Control then 
goes to ENDOPR. 


ANOP, TITLE, MNOTE, MEXIT, EQU, CSD, CNOP, 
DROP, USING, ORG, PRINT, SPACE, PUNCH, 
ENTRY, COM, EJECT, AND LTORG. 


All these subroutines follow a procedure 
Similar to AIF and AGO. In each case, con- 
trol goes to ENDOPR. 

MACRO 


Control returns to DRIVER. 


ICTL 


This subroutine puts out an error message 
and moves an END card image into the input 
buffer. Control is returned to DRVERL. 


COPY 


If in a system macro, the address of the 
library is NOTEd. In either case, the input 
in GETSRC is set to the library. A FIND to 
the library is then undertaken. Control 
returns to DRIVER. 


ISEQ 


The operand field is scanned and new input 
parameters in GETSRC are defined. Control 
goes to DRIVER. 


REP RO 


The next card is read and put into an edited 
text format. Control goes to ENDOPR. 


EXTRN 


The operands of EXTRN and WXTRN statements 
are scanned and indicated as defined for 
the dictionary. Control goes to ENDOPR. 


START, DXD, DSECT, and CSECT 


The type attribute is set, and control goes 
to ENDOPR. 


DC, DS 


The operand fields are scanned, and, if in 
open code, the attributes are defined. In 
either case control goes to ENDOPR. 


CCW 


Type, length, and scale attributes are 
moved into the edited text field. The 
operand field is scanned and control goes 
to ENDOPR. 


MEND 





This subroutine goes to ENDOPR to write 
edited text for the MEND card. It then goes 
to DCLSE. 


END 


The name, operation, operand, and comments 
are written in an edited text format. Con- 
trol is transferred to DCLSE. 


OPSYN 
An error message is issued. Control is 
returned to DRIVER. 


DCLSE 


This subroutine forces out the local dic- 
tionary block on SYSUT3. It saves the NOTE/ 
POINT address of the last local dictionary 
block and writes out the local dictionary 
block. It zeros the local hash table. It 
subsets the dictionary just written. The 
local dictionary on SYSUT2 is read in, sub- 
setted, and written out on SYSUT3. Control 
goes to DRIVER if macros are being edited 
(i.e., 
otherwise, it proceeds as follows. 


If any undetined operation codes are 
present, (standard ICTL parameters are 
assumed), the input in GETSRC is set to 
SYSLIB, and a FIND of this undefined 
operation code is executed. If found, the 
program returns to DRIVER. If not found or 


a MEND card transferred control here); 


if no undefined operation codes are 
present, the open code dictionary is sub- 
setted, the global dictionary is subsetted, 
and a XCTL to Phase F3 is executed. 


ENDOPR 


The comments field is edited, and control 
is transferred to NDSMT3. 


NDSMT 3 


If in a macro, this subroutine selects 
SYSUT3 as unit to write upon; otherwise, it 
writes on SYSUTL. If lookups are not sup- 
pressed, it inserts a little "a" pointer 
into the edited text format where appro- 
priate. In either case, it writes edited 
text on the selected unit. If an error 
record was written on SYSUT3, it is also 
written on SYSUT1. If a return is expected 
because of a previously set switch (SWTCH7, 
bit 0), it returns; otherwise it goes to 
DRIVER, 


GETSRC 


This program reads a record from SYSIN or 
SYSLIB, depending upon which was selected. 
The source is immediately written on SYSUTL 
if GETSRC is not processing system macros. 
Continuation cards and sequence numbers 

are noted and appropriate action is taken. 
Control returns to the caller. 


BWRITE 


This subroutine moves data to the buffer. 
If the buffer is full, it is written to 
the appropriate utility. In either case, 
control returns to the caller. 


BWFORC 

If room exists in the buffer, control re- 
turns to the caller. Otherwise, it goes 
to BWRITE. 

BWNOTE 

This program NOTEs the position of the 


selected utility and returns it and con- 
trol to the caller. 
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PHASE F3 -— CONDITIONAL ASSEMBLY AND MACRO GENERATION 


OVERALL OPERATION (FLOWCHARTS 8-11) 


Phase F3 reads text from SYSUT1. See 
Figure 8. This text includes source, 
error, and edited records. See Table 6. 
Source and error records are immediately 
written onto SYSUT2. MEND and MEXIT state- 
ments are not processed. The edited text 
for the main portion of the program and 

for all macro definitions, plus the sub- 
setted global and local dictionaries, are 
used to generate one-for-one statements in 
edited text form and to perform conditional 
assembly. Assembler edited text records 
are produced and written on SYSUT2. When 
the end of text is reached, control is 
transferred to PHASE F7 via MAC and RTA. 





Text input Macro dictionaries, 
from Phase macro definitions 
F2 


Figure 8. 





Output for use in 


Phase F7 


I/O Flow for Phase F3 


PHASE F3E - ABORT CONDITION (FLOWCHART 12) 


Phase F3E will be substituted for Phase F3 


if any of the following abort conditions 

arises in Phase F2: 

e The global dictionary fills up. 

e The local dictionary exceeds 64K bytes on 
the overflow file or in core. 

e The subsetting area is too small. 


All text is read from SYSUT1. Only source 
records with accompanying error records are 
written on SYSUT2. All other records are by- 


passed. 


When the end of text is encountered, 


an edited text record for an END card is gen- 


erated 


and written on SYSUT2, and control is 


passed to Phase F7 via MAC and RTA. 
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FUNCTIONS 


The functions of Phase F3 are designed to: 
e Initialize the phase. 


e Evaluate conditional assembly expres- 
Sions. 


e Perform conditional assembly. 


e Generate a parameter table from a macro 
instruction-macro prototype pair of 
statements. 


e Generate assembler edited text records 
using macro definition edited text and 
the information in the global and 
associated local dictionaries. 


Phase F3 evaluates conditional assembly 
expressions. If the expression waS in a 
SETx statement, the "a" pointer associated 
with the SET variable symbol in the name 
field is used to place the current SET 
symbol value in its dictionary definition 
entry. When an AGO or AIF instruction is 
encountered and the evaluation, if one is 
necessary, indicates that a branch must be 
taken, the NOTEG position of the fully- 
edited text named by the sequence symbol 
is obtained from the appropriate local 
dictionary. The text on SYSUT1 or SYSUT3 
is repositioned and the appropriate text is 
read in and processed. 

When a macro instruction is encountered, 
its exact location on the input file is 
NOTEd. The input file is SYSUT1 for outer 
macro instructions and SYSUT3 for inner 
macro instructions. A complete pass over 
the macro instruction text is made. Source 
and error records associated with the 
macro instruction are written on SYSUT2. 
When the end-of-macro instruction record is 
encountered, the position where the reading 
of text was discontinued is NOTEd so that 
the input of text can later be resumed at 
the correct position. The appropriate 
utility data set is then repositioned again 
to the beginning of the macro instruction 
text. 

The “a" pointer associated with the 
macro instruction is used to inspect the 
associated mnemonic entry in the global 
dictionary. This entry contains a field 
which designates the location of the 
associated subsetted local macro dictionary 
on SYSUT3. If the entry is zero, this in- 
dicates that this macro mnemonic represents 
an undefined operation to the macro genera- 
tor. If the entry field is not zero, the 
first segment of the subsetted local dic- 


tionary is read in. This contains a dic- 
tionary header record which indicates the 
size of this local dictionary. If there 

is room available in the block of main 
storage acquired by Phase F2, the complete 
local dictionary is brought into main stor- 
age and the available storage pointer is 
updated by the length of this local dic- 
tionary. The parameter table is construct- 
ed at this location. This table indicates 
the values to be substituted for macro 
prototype symbolic parameters when they 

are referenced in model statements or inner 
macro instructions. &SYSNDX and &SYSECT are 
treated as parameters, and their entries 
are assigned the first two entries of this 
parameter table. The third entry is 
assigned to the name field. Then the NOTEd 
location of the pertinent macro definition 
prototype statement edited text is obtained 
from the local dictionary header record, 
the prototype edited text is read in, and 
the parameter table is completed. For 
positional parameters, the values of the 
inner macro instruction operands are ob- 
tained from the appropriate dictionary, 

and for outer macro instruction operands 
they are obtained from the operand itself. 
Entries are sequentially made in the param- 
eter table. As each prototype statement 
keyword is encountered, it is compared 
against each macro instruction keyword op- 
erand until a match is found. The values 
are then entered in the parameter table. 
The cycle of comparisons to find the . 
matching macro instruction operand corre- 
sponding to the next sequential prototype 
keyword begins where the last cycle left 
off. 
around" fashion. Because the entries in 
the parameter table are variable length 
entries in position number (parameter) 
order, a separate length table with a two- 
byte entry for each parameter table entry 
is maintained. (This length table contains 
the accumulated length of each parameter 
entry. In effect, an entry in this table 
is an increment that must be added to the 
address of the beginning of the parameter 
table to locate its associated parameter 
entry.) 

After the parameter table is completed, 
the rest of the macro definition fully- 
edited text is read in. Conditional as- 
sembly evaluation is performed as required, 
substitutions are made for references to 
symbolic parameters and system variable 
symbols, and the macro definition is ex- 
panded, producing assembler-—edited text 
records for input to the assembler phases. 
If an inner macro instruction is encounter- 
ed, the length table is placed behind the 
parameter table, followed by the address of 
the length table and address of the begin- 
ning of the parameter table, and the entire 
cycle is repeated. Nesting of macro in- 
structions can occur to any depth, provided 
there is sufficient room left in the block 
of main storage obtained by Phase F2 to 


The operands are compared in a "wrap- 


enter the local dictionary associated with 
the inner macro instruction. If there is 
not sufficient room left, this information 
is saved for diagnostic purposes, the con- 
cerned local dictionary is not brought into 
main storage, further (deeper) nesting of 
macro instructions is discontinued, and the 
input data set (SYSUT3) is NOTEd. Process- 
ing continues at the discontinued text of 
the next outer level macro. 

When the ACTR value is exceeded within 


-a macro expansion, the information is 


saved for diagnostic purposes, control is 
returned to the outermost macro instruction 
expansion, and processing continues. If 
the ACTR value is exceeded in open code 
processing, the information is saved for 
diagnostic purposes, an END assembler in- 
struction record is created and inserted 

in the text stream on SYSUT2, and input is 
ended. 

Whenever the processing of a macro defi- 
nition is completed, generation of output 
text is resumed for the next higher level 
macro instruction or, if the outermost 
macro definition expansion has been com- 
pleted, processing of open code fully- 
edited text is continued. After completely 
processing the fully-edited text input from 
SYSUTL, control is transferred to the first 
assembler phase (Phase F7) via MAC and RTA. 


DICTIONARY ENTRIES 
SETA Variable 


This format is as follows: 


Undimensioned 


Dimensioned 


4 4 4 
” 


4 


n - SET variable dimension (number of 
variables in entry). These bytes are 
not present if n=1 (an undimensioned SET 
variable). 


Bytes 2 





Length of a complete entry is 4 bytes if 
the variable is undimensioned and 4n+2 
bytes if it is dimensioned. There are 4 
bytes per subentry. 


SETB Variable (Non-Dimensioned) 


This format is as follows: 
Bytes 1 


SETB Variables 
(8 entries) 


Each bit represents a SETB variable. 
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SETB Variable (Dimensioned) 


This format is as follows: 


Bytes 


SETB SETB SETB SETB 
Variables Variables Variables 








8 
n+7 
where Bt? | should be rounded to the 
next lowest integer. | 
Example: 
LCLB &B(26) 
T=2+4 26e2] = 2+ [a2| ee ea 


SETC Variable 


This format is as follows: 


cue aes 
Bytes 


eo ey —<| 


Length of entry is 9 bytes if the variable 
is undimensioned and 9n + 2 bytes if it is 
dimensioned. 


n — Same as SETA variable. 

L — Length of character string (data), 
(true length). 

Table Format for Symbols 

A symbol entry will always contain an L' 

and S' entry. If there is none, these 


entries will contain the value of zero. 
The format is as follows: 


Bytes ] 2 2 


Type — Type Attribute 
Macro Dictionary Header 


This format is as follows: 


Bytes 
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Undimensioned 


1 8 


4 4 4 4 ] 1 2 
D ACTR D NOTE/ 5 No. of | Size of 
ml 4 Loop ummy |} POINT | -O™™Y | blocks |. md. 


The header is attached to the subsetted 
dictionaries' output by Phase F2. 


Dummy — Not used. 


ACTR Loop — The A counter loop limit, i.e., 
initial assumption made by processor. 


NOTE/POINT — Location of block on SYSUT3 
in which the macro definition fully- 
edited text begins (points to prototype 
record). 


No. of blocks — The number of segments on 
SYSUT 3 in which the dictionary is con- 
tained. 


Size of MD — The size of the total macro 
dictionary in bytes. 


The header as modified during F3 processing 
of the macro instruction is as follows: 


Bytes 4 
Dictionary | ACTR ACTR Bs SYSUTI/3 rad 


DICT ADDR — The location of the higher level 
local dictionary. If the macro being 
processed is not an inner macro, this 
pointer points to the open code local 
dictionary. 





ACTR Loop — Same as macro dictionary header. 


ACTR CTR — The current loop count, 
i.e., the number of times the loop has 
been passed. 


NOTE/POINT — The location of the block in 
which the end-of-macro instruction rec- 
ord is located. 

FLAG — A Switch, used to signal whether the 
length table has already been stored 
following a parameter table. 

SYSUT1/3 —~ A switch to indicate: 

8 — Input is from SYSUT3 
O — Input is from SYSUT1 


Delta M-I -- Position of discontinued text 
(record following macro instruction) 
relative to beginning of block. 


Macro Dictionary Parameter Entries 


The macro dictionary parameter entries are 
given in Table 7. The SET variables are 
the same as given above. 


Table 7. Parameter Entries 






























No. of 
~ 4-Byte 4-Byte 
K 
2 L Char. String 
1 
3-Byte K BCD 
1 
CSD 3-Byte K BCD 
5-Byte K' BCD 
S Attributes Chor. | L NAME 
1 
SUB Total 1 l T.L Entry Entry 
é T FAG. biker |, oe A 2-5 oo 2-5 be 
Ent 
Np os ee | 
Ly 
T = Type Attribut Table 9). 
Mace arse heats CHAR = Character string 
TL, = L 
HBD = Hex, binary, decimal self-defining term 
K! = No. of characters in an operand (excluding commas) csp = iChameie selecting enh 
= : = e b . 
~ of — between outer commas in a sublist SYM 2 OndisanpSyibel 
= Z 1 
2 Ue SUB = Sublist 
| . &SYSNDX = Macro-instruction Index 
N= = No. of operands of a sublist 
SECT = trol Secti 
é 41 (Dees nat equal able) &SY Current Control Section 
= 0 (Omitted operand) 
INPUT RECORD FORMATS Bytes Variable 






] 2 7 ] griaple 
Set Type Assembler} Name Operatio 
Bytes ¥Variable Variable 


Operand Comments 
er] y fear] | © 


All flags used in the input record formats 
are listed in Tables 6, 8, and 9. 





Machine Instructions 





The general format of machine instructions 
is as follows: 
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@e The text consists of normal "PUT" action 
(no evaluation) and/or evaluation text 
(see VALUAT subroutine). 


e Each field is terminated by an end-of- 
field flag (Y). 3 


@e All fields except the comments field 
may contain evaluation text. 


@® Output to the assembler will contain 
four fields, a length followed by a 
character string for each field. 


Table 8. 
Value 
(Hex.) 
00 


01 


Flag Description 


Period 
Right Paren, 











Left Paren, 
Subscripted Left Paren, 
Plus 
Minus 


Multiply (asterisk) 








Divide (slash) 
Equal 
Not Equal 
0A Less Than 
0B Greater Than 
oc Less Than or Equal to 
0D Greater Than or Equal to 
OE Not 
OF Or 
10 And 
22 Hexadecimal Self-Defining Term 
23 Binary Self-Defining Term 
24 Decimal Self-Defining Term 
25 Character Self-Defining Term 
26 Null Symbol & Evaluation Flag 
27 Character String 
28 SETA 
29 SETB 
2A SETC 
2B Comma 
2C Begin Substring 
2D Begin Substring Operands 
2E First Operand Completed 
2F Second Operand Completed 
30 } Actual Internal Value Right Paren, Used Only on 
Sublist 
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Assignment of Flag Values (Phase F3) 





Table 8. Assignment of Flag Values (Phase F3) 
(Cont'd) 


Flag Description 


| Arithmetic Expression mode.(Absence indicates 
character expression) 






Value 






32 Blank 

33 Type Attribute Reference 

34 ] Length i" . 

35 Integer ss . 

36 Scale : " 

37 Number . : 

38 Count a. 

39 | Symbolic Parameter Reference 
3A System List 

FO Sublist 

F8 End of machine instruction field () 
F9 {| Continue sublist 

FA Symbol 


FB Positional (P) 
FC Keyword «) 





FD PUT (No evaluation necessary) 
FE End of block 
FF End of evaluation (E) 
eTable 9. Phase F3 Internal Values for Type 


Attributes 


ZO. 2 as KS OOO 


- 


P 
Z 
E 
D 
K 
F 
G 
H 
S 
A 
V 
Y 
R 


wm Cc 


a 


An input record example (Load Address) 
follows: 





Name Operation 
Bytes | 9 1 l l ] 1 | ee | 1 
R/L and 










Operand Zero(No Comment) 


1 2 
Par, 


A typical output record (Store) is as 
follows: 


Bytes 





Bytes 8 l 





Assembler flags 


Y — End-of-field flag (X'F8') 


E — End-of-statement flag (X'FF') 

NOTE: If an error is detected during eval- 
vation, a full word of zeros is put out to 
assure the assembler four fields. An error 
record will then be put out by the genera- 
tor phase. 

NOTE: CSECT statements have the same for- 


mat as the statement type flag, except for 
the first byte. 


Source Statements 


The source format is as follows: 


1 2 ] 80 
: SOURCE 


S. FLAG - Source flag (X'08') 


Bytes 






R/L - Record length (always 84 = 0054, -) 


A.FLAGS - l-byte assembler flags 


Bit O Unused 
Bits 1-3 Record type 
000 — Source without editing = 
print as is 
OO1 — Error 
010 — Construct for print 
O11 — Construct for print if 
generated 
100 — Process only 
101 — Illegal 
110 — Process and construct 
for print 
lll -— Process and construct 
for print if genera- 
ted 
Bit 4 Unused 
Bit 5 Error record indicator 
O — No error record follows 
1 — Error record follows 
Bit 6 Continuation bit 
O — Source not continued 
1 — Source continued 
Bit 7 Unused 
SOURCE ST. — Source statement 


Set Statement 


The set statement format is as follows: 


Bytes 1 2 


1 st 
° R 





7 1 2 ] 1 I ] 
nena [e tg? c | Blank Operand expression Blank 
ray 199) Pointer MO }(eval. routine format) 77" 


Leas Field 


ST. FLAG — SET statement flag (X'04') 
Flag — SET variable flags (SETA, SETB, 
SETC) 
C — Bit O Dictionary bit 
0 — Local 
1 — Global 
Bits 5-7 SETB bits. 


E - End of statement flag 
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MEND or MEXIT 


This format is as follows: 


Bytes 





AIF Statement 


This format is as follows: 


Byles Variable 





AGO Statement 


The AGO format is as follows: 


Bytes | 2 7 2 





eh 


AGO "a 
| flag | R/L | Dummy ee Pointe | Dummy | 


CSECT, DSECT, START 


This format is the same as that for Mach- 
ine Instruction, above. 


Bytes Variable | 


C SECT Assembler 
flag flags 


Error Statements 





Error statements are treated exactly the 
same as the source statements with the same 
format. However, the error statement flag 
is different from a source statement, be- 
cause error statements must be distinguish- 
ed from source statements in processing 
macro instructions and prototypes. The 
record length is seven bytes. 
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Macro Instruction 


General Format. 
follows: 


The general format is as 


iegr ——p nee (One Posies) Vane ae 
Variable 1 | 


Macro Assembler Sar (Blank) 
flag flags aaa fie 


B- sons Source oe "A" oe Record ap er al 
Bytes Wari 


ae See Seo 


(Typical Operand) 
Bytes L_ Variable 
R/L Assembler E Operand 
Flags value 

(Final Operand) 


] 2 Z ] griable é 
Assembler Operand 
> je [vente] © [rece] |e | 


A — One logical record. It contains the 
macro flag, the "a" pointer, and re- 
peats the name field as the first op- 
erand. The format of the name field is 
that of an operand. 


oe kel 











Bytes 


B — "n" logical records. These logical 
operand records can contain source rec- 
ords between any operand records. 


(There are six shown in this example.) 
C — End of macro instruction record. 
D — Operand record flag (X'OB'). 


E — Positional or keyword flag. A position- 
al flag must precede each positional 
parameter. A keyword flag must precede 
each keyword parameter. Positional 
parameters must precede keyword param- 
eters. 


@) 
®) 


F — End of macro instruction flag (X'0C') 


Positional (X'FB') 


Keyword (X'FC') 


R/L (End of machine instruction record) 
Record length = 4 


G— No. of keyword operands in the macro 
instruction. 


Continuation and Segmentin Macro in- 
structions (and prototype) may be segment- 
ed by adding a continuation flag after the 
last operand record in the block. An op- 
erand record must be fully contained in 
one block. 


ore Global 
®) Dummy | Evaluation flag | SETA . ai or 
pointer 
{| Local 


Bytes} 2 


a Global 
Dummy |Evaluation flag SETB an or 
pointer 
Local 


Only one evaluate flag is needed at 
However, 





Bytes 






NOTE: 
the beginning of the parameter. 
it will be ignored if repeated. 


Prototype Statement 


The prototype statement format is as 
follows: 


Bytes 1 2 ‘1 Variable 4 
Prototype Assembler 

X — Number of positional operands. 

B — Same source and operand mix possibili- 


ties aS macro instruction, except that 
only keyword operands appear in proto- 


type. 


C — Same as end of macro instruction 
record. 


NOTE: Trailer record "C" would contain 
number of keywords for prototype. 


Operand Value Formats 


Each operand value must be preceded by a 
or type. There is one exception. 

See Sublists. Formats are as follows: 

1. Character 


Bytes Variable 





2. Symbol 


Bytes Variable 
Symbol "Ng" Char. Symbol 
rm Pas [om [om [eS] fe 


decimal self-defining terms 





3. Hex, binary, 


Bytes Variable 


Binary Char. 
rm | * [exper] 


X — Flag (Hex, binary, 





decimal) 


4. Character self-defining terms. 
Same as 3, except that X = CSD flag. 
5. Omitted operand 
This is a character operand whose L = 0. 


Bytes 





6. When the evaluation flag is in the record, 
operands are evaluated by substitution 
and concatentation. The evaluation flag 
precedes parameters which require evalu- 
ation, such as those containing variable 
symbols. 


Bytes 2 Variable 1 
Eval. Expression (in evaluation 
flag routine format) 


Parameters which do not require this flag 
are as follows. 





Type Parameters 

HBD Hex, Binary, Decimal 
CSD Character Self-Defining 
SUB SUBlist 

ss Character 

SYM SYMbol 
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7. Keyword 


Bytes | ] 1 Variable ] 1 Variable 
(®) Char. L Keyword Dum Value 
flag name y (formats 2-5) 


L — Length of keyword name + 1 

The value of a keyword may also be a 
Sublist. For prototype operands, only 
formats 1 and 4 above apply. 
Sublist Operands 


Sublist operand formats are as follows: 











Bytes 1 2 7 1 ] l 5 1. Variable 1 

First Assem, Operand 

Bytes 1. 2 7 1 Variable ] 

A|R/L Assem, z Operand 
Flags value 

Bytes 1 2 7 1 Variable 1 1 1 
Last Assem. Operand , (if not 
Record e value yN last operand) 





Source records may appear between sublist 
operands. 


Operand value — use formats 2-5 above. 


B — The positional (P) or keyword flag ® 
which appears only this time for the 
entire sublist operand. 


C — Sublist flag (X'FO') 
A — Operand record flag (X'0OB’) 


Z— Continue sublist flag (X'F9') 
N' Number of operands in sublist. 


EVALUATION ROUTINE FORMATS 


Operand Reference 


Reference to any operand in all input 
statements is made by position. Operands 
are numbered as follows: 
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—- &SYSNDX 
&SYSECT 

- Name field 
Operand field 


WHE O 
I 


Keyword operands are given a position 
number Similar to positional operands. The 
positions are assigned in the order that 
they appear in the operand field of the 
prototype statement. 


Example: 


A — Operand request flag (X'39') 


B — Operand number 


Attributes (L',I',S',T') 


Attribute formats are as follows: 


Bytes 1 


A — Flag byte (type of attribute) 

B — Parameter or symbol flag 

C — 2-byte pointer for symbol. The param- 
eter position in the 2nd byte (B) is for 
the parameter. 

D — Dummy 

Character String (C' ') or ' ' 


This format is as follows: 


Variable 


Bytes 1 ] 





A — Flag byte 


B — True length byte 


C — Data bytes (n bytes of characters). 
This does not exist if B = 0. 


Decimal, Hex, Binary Value, Character Self- 


Defining Terms 


This format is as follows: . 


Bytes — 3 
ate 


A — Flag byte 


B — Data bytes (3 bytes of data in binary) 


Variable Symbol 


This format is as follows: 





A — Flag byte (SETA, SETB, SETC) 
B — 2-byte pointer 
C — Bits 5-7 = Bit no. for SETB 
O = 0 for local, 1 for global. 
Substring 


This format is as follows: 





A — Substring flag 
B 


— Character expression 


) 


— Sublist left parenthesis flag 


w 
| 


Expression l 


E — Sublist comma flag 
F — Expression 2 


G — Sublist right parenthesis flag 


Subscripting 


In this format the left parenthesis is re- 
placed by a Special subscript left paren- 
thesis flag (X'03). The rest of the for- 
mat is as previously described. 


Concatenation 


Concatenation occurs automatically by 
eliminating the period, if it exists. Two 
Character strings (or set variables), one 
immediately following the other, will be 
concatenated, and no concatenation flag is 
required. 


FUNCTIONAL PROGRAM SECTIONS AND ROUTINES 


LEUF3 

This routine relocates permanent and open- 
code dictionaries, initializes I/O buffers, 
and initializes input pointer and macro 
base pointer. 

CGOTO 

This is a computed GO TO on the various 
statement types. 

MACHOP 

This routine processes edited text records, 
evaluating fields which require substitu- 
tion. 


SOURCE 


This routine puts out a source or error 
record. 

SETST 

This routine determines the address of the 
result field, evaluates the operand, and 
stores the result. 


CSECT 


This routine stores the last CSECT name 
and outputs the record. 3 
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AIFST 


This routine evaluates the expression. If 
expression is false, processing continues 
with the next sequential record. If the 
expression is true, the text file is re- 
positioned to the sequence symbol. 


AGOST 


In this routine the text file is reposi- 
tioned to the sequence symbol. 


MENDST 


If exit is from an outer macro, this routine 
sets the text file to read from SYSUTI; 
otherwise it continues reading from SYSUT3. 
It positions the text file to read from 
discontinued text. 


MINSTR 

This routine outputs the source, notes the 
discontinued text, and repositions the 
text file to the beginning of the macro 
instruction. 

ENDST 

This routine damps output buffers and re- 
winds utility files. 

BEGMAC 

This routine reads the macro dictionary 
and initializes the parameter table with 
SYSNDX and SYSECT entries. 

PROTO 

This routine points to macro definition 
prototype and reads it into the input 
buffer. 

PROTOL 

This routine builds the parameter table, 


evaluating operands as needed. A merge 
of keywords is performed if keywords exist. 


VALUAT 
This routine initializes the mode switch 


to character expression, pointers, operator 
table, and result list with zero and 
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zero-out length buckets of string areas. 
In general, this routine is called for the 
evaluation of an expression. Evaluation 
may be required in the name, operation, or 
operands fields. An expression may be a 
Simple parameter reference or a complicated 
arithmetic expression in a SETA operand. 

Any term that requires a retrieval from 
some dictionary (parameter reference or 
SET variable) will eventually pass through 
the VALUAT routine. 

The routine is designed to operate on 
the flags and operators shown in Table 8. 


SYMBL 


This is an input pointer pointing to an 


operator. 


CHE ORC 


This routine tests for the type of operator. 


ADVOP 





There is no forcing in this routine. It 
advances the operation pointer and the 
emergency operation into the operation 
table. If the operation is OR or AND, it 
reinitializes the mode switch to character 
expression. 


ADVINP 


This routine advances the input pointer. 


FORCE 

This routine determines if the new operation 
forces the last operation entered in the 
Operation table. 

TSTOPL 

This routine tests for end of expression. 

If so, it returns to the driver routine. 
DOOPR 

This routine fetches the address of the 


two fields to be processed. 


SUBSC 


This routine processes subscripted variable 
Or parameter sublist or SYSLIST. 


RELINT 


This routine initializes a string pointer 
with the address of string area 2 and 
turns off the ‘PUTST' switch. 


META3 


If character expression mode exists, this 
routine fetches the binary word and con- 
verts it to decimal. If arithmetic ex- 
pression mode exists, it initializes for 
entry of the result, then stores the 
result. 


MEB 





If in the arithmetic expression mode, this 
routine initializes for entry and stores 
the result. 

METC4 

This routine fetches the length of a string, 
initializes for the entry of the result, 
and stores the result. 

DOOPR 

This routine processes the relational op- 
erator and stores the result. 

RELAT 

This routine processes the relational op- 
erator and stores the result. 

ARITOP 

This routine processes the arithmetic op- 
erator and stores the result. 

NOTOPR 

If outside range of valid flags, this 
routine sets the end of expression flag in 
the operation table; otherwise it performs 
a computed GO TO on the flag. 

CSD 


This routine translates a character string 
back to the original representation. 


DECINT 


This routine stores the value of a decimal 
in the intermediate result list. 


META 


This routine initializes for a SET variable. 


-METB 


This routine initializes for a SET variable. 


METC 





This routine initializes for a SET variable. 


CHARST 

This routine puts a string in the string 
area. 

BEGSUB 

This routine stores the length of a string 
already present in the string area and 
sets the substring mode. 

SETARE 

This routine sets the Mode switch to the 
arithmetic expression mode. 

SBEND 


This routine sets the substring comma or 
the left parenthesis switch. 


TATTBT 

This routine checks for the type attribute 
of a parameter. 

LATTBT 


This routine checks for the length attribute 
of a parameter. 


SATTBT 


This routine checks for the scale attri- 
bute of a parameter. 
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PACK3 


This routine stores the address of a result 
in the pointer list. 


SYSLST 


This routine stores a parameter flag to 
Simulate a parameter reference. 
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PARMTR 


This routine stores a parameter flag and 
number into the pointer list. 


ATTPAR 


This routine checks for the attribute of a 
parameter. 


OVERALL OPERATION (FLOWCHARTS 13-27) 


Phase F7 has three general functions: 


1. Processing symbols 
2. Processing literal values 
3. Assigning storage locations 


Symbols are processed by entering the 
mnemonics and their relative storage ad- 
dresses ina symbol table. Addresses are 
assigned relative to the beginning of the 
control section in which they are deter- 


mined. (While the program performs this 
function, it is working in the "assignment 
mode.") 


If more symbols are defined in the user's 
program than will fit in the main storage 
spaces allotted for the symbol table, the 
point in the text that caused overflow is 
NOTEdG and the remainder of the program is 
processed without making further symbol 
table entries. However, symbols already 
defined in the symbol table are substituted 
into the text where applicable. (While per- 
forming these functions, the program is in 
the "substitution mode." 

When the end of the text data set is 
reached, it is TCLOSEd to the beginning, 
and operand processing continues until the 
previously noted overflow position is 
reached. At this point, the mode of proc- 
essing reverts to making symbol table en- 
tries (assignment mode), and the next sym- 
bol table segment is constructed. 

The process of building symbol tables 
and processing operands continues until the 
last symbol defined has been placed in the 
symbol table. 

As name fields are being processed, 
Phase F7 collects appropriate symbols and 
creates an external symbol dictionary (ESD) 
which will be processed by Phase F Inter- 
lude (FI). 

Phase F7 also processes literals and 
self-defining terms in expressions af- 
fecting the location counter. Literals 
are entered in the symbol table. When an 
LTORG or END assembler instruction is en-_ 
countered, the literals in the table are 
inserted in the program stream. 

All mnemonic operation codes created by 
concatenation or parameter substitution 
during macro generation are translated in 
this phase. (If the DOS assembler option is 
specified, F7 treats CXD, DXD, and OPSYN 
assembler instructions and Extended 
Precision machine instructions as undefined. 
It treats L-type and Q-type DC and DS 
instructions as unknown types.) 

Cross-reference records are generated in 
Phase F7 during symbol processing and ex- 
pression evaluation. 
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Phase F7 also creates a TESTRAN symbol 
table if requested by the programmer, and 
writes cards generated by PUNCH and REPRO 
statements. 

Intermediate text is read from SYSUT2, 
and literal pools and intermediate text are 
written on SYSUTI1. 

Overflow of any of the following tables 
will result in writing overflow segments on 
SYSUT3. 


@ External symbol dictionary table segment. 
@ Literal-pool base table segment. 
e Cross-reference table segment. 
T/O FUNCTIONS 


Phase F7 may make several passes at the 
source text. See Figure 9. On the ini- 
tial iteration, the text is read from 
SYSUT2 and reblocked onto SYSUT1. On sub- 
sequent iterations, the text is passed be- 
tween SYSUT1 and SYSUT2. 

The text is reformatted such that a 
"broken" record will always start at the 
beginning of a physical block. This will 
ensure that a logical record will be con- 
tained within a single physical block. 

Edited text records are moved from the 
input buffers to a work area where work 
buckets are attached. The records are then 
transferred to the output buffers for 
eventual output to a utility file. 

Error records are generated in text for- 
mat and are transferred to the output buf- 
fers as errors are encountered. 

As the cross-reference block and literal 
base table overflow, they are written onto 


the overflow file, SYSUT3. Each time the 
PUNCH, 7 
REPRO, 
TESTRAN 


PUNCH, REPRO, 


Text input A> TESTRAN 


from Phase F3.  ~S TN, 
~~ Phase 
Z F7 
7 
72 


Text if overflow 


Cross Reference Table 
Literal Base Table 
External Symbol 
Dictionary Overflow 


) a Text Output Symbol 
to Phase F8 ‘| Table 
Error Records Literal SYSUT3 
Table 
Main 
Storage 


Figure 9. I/O Flow for Phase F7 
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external symbol dictionary overflows it 

is written onto SYSUT3, and its position 

on the file is NOTEd for future reference 
within the phase. The external symbol 
dictionary blocks are identified and called 
from the overflow file through the use of 
the NOTEd record position. 


RECORD FORMATS 


Cross Reference Records 


This format is as follows: 
Bytes 


Statement Length 
FLAGB 


FLAGA - 
FOi¢ - Base symbol (type 1) 





Fli¢ - Reference to symbol (type 2) 


F2i¢ - Multiply defined symbol (type 3) 


FLAGB - 
QO - Absolute value —— 
Not O - External symbol dictionary ID 


Error Record 


This format is as follows: 


Bytes 2 1 1 





1 ] 
Error Column 
type pointer 


R/L - Record length. R/L = 4 + 2N, where 
16 > N>O. (There may be as many as 16.) 





Edited Text Records -— General 
Phase F7 receives input statements in a for- 


mat prepared by the macro generator. The 
formatted text records are called "Edited 


38 


Text Records." Phase F7 processes these 
records and attaches an "appended fixed 
field" and, when required, "work buckets". 
The format of the edited text record is as 
follows: 


Fixed Field Variable Field 
Assembler Flags 


Variable ] 


TXRL | FLAGA! TXHEX | TXASC}] TXABP | TXNAML| TXNAME! TXOPL 


—————. Variable Field (Cont'd) a “T 


Voriable Variable 1 Variable 3 


TXOP | TXOPNL | TXOPN| TXCOMLITXCOM|TXLOC | TXURS 





Bytes 








Appended 
Fixed Field 


Bytes 





— Bucket(s) (where appended) ca 


variable 


Bytes 


Type | and/or Type 2 and/or Type 3 
Work Buckets 


The fixed field and the variable field are 
the input record to Phase F7. The appended 
fixed field is attached to this record in 
Phase F7. 


Edited Text Record Fixed Field Format 


TXRL - Record Length. This will be set to 
the total number of bytes (including 
appended fields) by the GET statement 
routine in Phase F7. 


FLAGA - Flag byte. Contains the following 


bits: 
Bit 0 TXRLI. Last record in buffer indi- 
cator. Correctly set by the GET state- 


ment routine in Phase F7. 


Bits 1-3 TXRT. Record type 
000 - Print as is. Source record only. 
(These are assembly records 
created from program source input 
records in Phase F2.) 


OOL - Error record. 


O10 


Oll 


100 


101 


110 


111 


Bit 4 TXBF. 


(Created in any 
phase.) 

Print as is, but do not display a 
statement number. Source record 
only. (Created in Phase F3 from 
edited text, type 110, for condi- 
tional assembly substituted state- 
ments outside of macro defini- 
tions.) 

Print as is if GEN option is on. 
Steps statement number counter. 
Source record only. (Can be 
source record of comments for 
generation within macro defini- 
tion, e.g., "*" in Phase F2, or 
may be source record created in 
Phase F3 from edited text, type 
111, generated by macro instruc- 
tion expansions.) 

Process only. Edited text and 
logical statement records only. 
(Edited from source in Phase F2.) 
Internal assembler control record. 
(In Phase F7, CSECT, ORG, and 
LTORG.) Edited text records are 
generated for END statement proc- 
essing. 

Process this record and construct 
source record for print. (Edited 
text, but no source, e.g., 
literals, and Phase F3 conditional 


assembly substituted statements out- 


side of macro definitions. 


Process this record and construct 
source record for print if GEN 
option is on. (Edited text and 
MNOTE statements generated by 
macro expansions, Phase F3.) 


Break flag. Indicates that a 


logical record continues in the next 


physical block. 


The Phase F7 GET rou- 


tine arranges all edited source and 
edited generated records so that this 
condition does not exist. 


Bit 5 TXERI. 


EOL. 


Error record follows indica- 
Used by the PUT ERROR common sub- 


routine in phases F7 and F8 to deter- 
mine whether to create a new error rec- 
ord or to attach to an existing error 
record. 


Bit 6 TXESI. 


Equal sign indicator. Set 


by the Phase F7 GET statement routine. 
O - There is no literal in the operand 

of this statement. 

1 - There is a literal in the operand 

of this statement. 


Bit 7 TXMARK. 


Phase F7 iteration point 


flag. 


Bits O-l TXTO. 


Type of operation. 


Ol - Machine Operation. 
10 - Assembler operation. 


Phase F7 


OO -—- Unchecked, 


(Phase F7 GET state- 


ment will set equal to O1 or 10 if 


a OO condition 
operation code 


Bit 2 TXEMF. 


Bit 3 TXMDN. 
tor. 
passes.) 


Bits 4-7 TXRIM. 


mnemonics. 
codes 
Bit 4 - 
Bit 5 - 
Bit 6 - 
Bit 7 - 


Extended 


Multiply 
(Set by Phase 


exists and a legal 
is converted.) 


mnemonic flag. 
defined name indica- 


F7 for future 


RL mask for extended 


Used for special switch 
on assembler operations. 

Name required 

Name not allowed 

Operand required 

Operand not allowed 


TXHEX - Machine operation code or internal 
assembler operation code. 


TXASC - Assembler Switch Code for machine 


operations 
Bits 0-1 00 


Bits 2-3 00 


Bits 4-5 
Bit 6 ud 


Bit 7 1 


No special register 
requirements 

Register must be even 
Register must be 0 or 4 
Register must be 0, 2, 
4, or 6 

No boundary alignment 
Half word 

Full word 

Double word boundary 
alignment 

Operand format within 
instruction class 
Literal permitted in 2nd 
and 3rd operand. 

Literal permitted in lst 
operand. 


TXASC -—- Assembler Switch Code for Assembler 


Operation 

Bit O Uninitiated private code. 

Bit 1 Possible symbol table entry. 

Bit 2 Location counter reference, 

Bit 3 Special Phase F7 cross-reference. 

Bit 4 Substitution required. 

Bit 5 Not Used 

Bit 6 Not Used 

Bit 7 Phase F8 uninitiated private 
code. 


TXABP - Appended fixed field pointer. 


Edited Text Record Variable Field Format 


TXNAML - Name field length. 


If zero, there 


is no name field. 


TXNAME - Name field. 


TXOPL - Operation field length. 
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TXOP - Operation field. 


TXOPNL - Operand field length. If zero, 
there is no operand field. 

TXOPN -—- Operand field. 

TXCOML - Comments field length. If zero, 


there is no comments field. 


TXCOM -—- Comments field. This field will 
contain comments and extraneous data. 


Edited Text Record Appended Fixed Field 
Format 


TXLOC - Location counter. 
during assignment pass. 


Set by Phase F7 


TXURS - Unresolved symbol counter. 


Misc. - 

Bits 0-3 Unused. 

Bit 4 TXLES. End of string indica- 
tor for literal DCs. Unused 
on all other types. 

Bits 5-7 TXSTG. String number for 
literal DCs. 

(or) TXALIN. Alignment for machine 


operation codes. 


Work Buckets 


There are three primary types of work 
buckets: | 


@e Type 1 - Literal in operand. 
@ Type 2 — Symbol in operand. 


@ Type 3 - DC, literal DC, 
tion code. 


and DS opera- 


These work buckets are appended to edited 
text records by the Phase F7 GET statemen 
the first time through. , 


Literal in Operand. If the equal sign in- 
dicator is set, a 6-byte Type 1 work bucket 


will be appended immediately following the 
appended fixed field. The format for the 
Type 1 work bucket is given in Figure 10. 


Byte l - 

Bit 0 TXWTYP. Work bucket type 
(must be zero; 0 = type 1). 

Bit 1 TXWLEN. Work bucket length 
(must be zero; 0 = 6 bytes). 

Bits 2-5 (Blank) 

Bit 6 TXLEVI. Literal evaluated 
indicated. 

Bit 7 TXLASIT. Literal assigned 
indicator. 


TXLSTG - Literal string number. Corre- 
sponds to entry in literal base table. 
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TYPE 1 WORK BUCKET — LITERAL IN OPERAND FIELD 






; 
x 
if TXSLEN | TXSESD TXSVAL 
: | 
C 
1 1 1 


bytes 
NOTES: XSBLN| TXSPTR] @ 
@ Symbol work buckets ofter 
substitution 
@ Symbol work buckets before ! 
substitution bytes | 1 ] 1 
{ 0 a : 
@) Symbol work buckets for 
EXTRN and ENTRY 
TXSPTRI @) 


m—- MMO XK 


Figure 10. Types 1 and 2 Work Buckets 


TXLDSP - Literal string displacement. If 
the value substituted indicator equals 
zero, the third byte of TXLDSP will con- 
tain a pointer to the symbol (relative 
to the beginning of the operand field). 
The second byte will contain the symbol 
length. 


TXLLEN - Literal length attribute. 


Symbol in Operand. If symbol table over- 


flow occurs, it is necessary to append one 
Type 2 work bucket for each symbol in the 
operand field, including symbols within 
literal specification fields. See Figure 
10. The order of work buckets corre- 
sponds to the order of the symbols in the 
operand field. CSECT, DSECT, and COM rec- 
ords will also be appended by a six-byte 
symbol work bucket. 


Byte l - 
Bit 0 TXWTYP. Work bucket type 
(must be one; 1 = type 2). 
Bit 1 TXWLEN. Work bucket length 


(must be zero; 0 = 6 bytes). 


Bit 2 TXSDOC. Symbol defined in 


DSECT or COM indicator. 


Bit 3 TXSUBS. Value substituted 
indicator. 

Bit 4 TXLAS. Last symbol in operand 
indicator. 

Bit 5 TXSEXI. “Implied length ex- 
ceeds 256" indicator. 

Bits 6-7 TXSTPC. Adjective code. 


TXSLEN - Implied length. 
TXSESD - External symbol dictionary ID. 


TXSVAL - Value. If the value substituted 
indicator equals zero, the third byte of 
TXSVAL will contain a pointer to the 
symbol (relative to the beginning of the 
operand field). The second byte will 
contain the symbol length. 


TXSBLN - Symbol byte length. 


TXSPTR - Pointer to symbol in operand 
field. 


TXSESL - Last operand in EXTRN/ENTRY indi- 
cator. 


DC, Literal DC, and DS Operation Code. [If 
the operation code is one of these three 


types, one 15-byte Type 3 work bucket will 
be created for each operand. See Figure 
zi ee Each operand work bucket will be 
followed by a six-byte work bucket for 
each symbol in the operand. 


Byte l - 
Bit 0 TXWTYP. Work bucket type 
(must be zero; 0 = type 3). 
Bit 1 TXWLEN. Work bucket length 
(must be one; 1 = 15 bytes). 
ji Penne cee 1 
af pate ee ps on ee 
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fom TXDLEN | TXDUPL | TXDCON 


Bytes 
Bit 
TXDPTR 


TXDEXP TXDLNM 


TXDSCM 





Figure ll. Type 3 Work Bucket 


Bit 2 
Bit 3 


Bit 4 


TXDPPI. DC previously processed 
indicator. 
TXDLMP. Length modifier present 
indicator. 
TXDLAS. Last operand indicator. 


TXDTYP —- 


TXDLEN 


TXDUPL - 


TXDCON 


TXDPTR - 


Type, translated. 


See Table 10, 


Total length. 
Duplication factor. 
Number of constants. 


Pointer to first byte of operand in 


text (relative to beginning of operand 


field). 


TXDEXP — 


TXDSCM 


TXDSYM 


TXDALN 


TXDLMD 


Table 10. 


Hexadecimal 
Number 





Exponent. 

Scale modifier. 

Symbol work buckets flag. 
Alignment. 


Length modifier type. 


DC/DS Type Indicators for Type 3 
Work Buckets 


Meaning 


Character 

Hexadecimal 

Binary 

Packed 

Zoned 

Double precision floating point 
Single precision floating point 
Full-word fixed point 
Half-word fixed point 

A-CON 
Y-CON 
V-CON : 
S-CON 
Q-CON 


Address Constants 


Extended precision floating point 
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O - Byte 
1 - Bit 


TXDLNM - Length modifier value. 


Special Work Bucket. A special work bucket 
is used for TITLE, PUNCH, REPRO, and MNOTE 
edited text records. This format is as 
follows: 


a Fixed Field — Variable Field — 
TXRL | FLAGAITXHEX |TXASC |TXABP [TXNAMLITXNAME 


——_————- Variable Field (Cont'd) en _ 
] ariab > Vo iao - rian - oriab - 
Byte | Edited 
TXOPL | TXOP |TXOPNL J|TXOPN{|TXCOML |TXCOM 
count | operand 


The eight-byte fixed field is the same as 
that described under "Edited Text Record 
Fixed Field Format." The variable field is 
the same as that described under "Edited 
Text Record Variable Field Format." How- 
ever, in place of an appended fixed field 
is a special work bucket, as follows: 


Bytes 







Bytes 





Byte Count - The byte count of the edited 
operand for punching or printing. 


Edited Operand - The punch or print image 
in external code constructed from normal 
edited text in Phase F7. However, if 
PUNCH or REPRO is output in Phase F7, the 
byte count of this field is zero. 


LTORG Statement Workbucket. The format 
for this workbucket is as follows: 


Bytes 4 4 4 4 4 4 4 4 





chain, 


L8 - Total length of 8-byte 


L4 - Total length of 4-byte chain. 


L2 - Total length of 2-byte chain. 


Ll - Total length of 1l-byte chain. 


N8 - Number of entries in 8-byte chain. 
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N4 - Number of entries in 4-byte chain. 
N | 
N2 - Number of entries in 2-byte chain. 


Nl - Number of entries in 1l-byte chain. 


TABLES 
Symbol Table 


The symbol table contains a collection of 
symbols, OPSYN definitions, and literals 
with their associated attributes. It is 
built during Phase F7. 

The symbol table remains in core storage 
as long as the space allocated will hold it. 
It is used by Phase F7, Phase FI, and 
Phase F8. 

There are three types of entries in the 
symbol table. 


1. Name entries. 
2. Literal entries. 
3. OPSYN definitions. 


Name Entries. EQU, CCW, DC, DS, machine 
instructions, and LTORG, and external name 
entries EXTRN, WXTRN, START, CSECT, and 
DSECT. 


2 


Cae 


1 1-8 1 3 2 3 
one 9 bits 7 bits 
Symbol | Symbol a Adjective Value Length Chain 
tem : 
Length Name Ba vier Code Pointer 


Adjective code - 


Bit 1 1 - EQU operand defined 
. as external symbol 
Bit 2 1 - Pointer present. 
Bit 3 1 - XD complete (external 
definition) 
Bit 4 1 - LD complete (label 
definition) 
Bit 5 1 - Defined in DSECT or COM. 
Bits 6-7 External symbol dictionary 
type 
00 - CSECT 
Ol - EXTRN/WXTRN 
10 - DSECT 
11 - NAME 


Value - present only in name entries. 


Length - present onl:; in name entries. 


Chain pointer - present only when a symbol 
with the same hash has been previously 
entered in the table. This pointer is 
the address of the previous entry. 


OPSYN Entries. The format is as follows: 


Literal Entries. 


Variable 1 


oer ee F 


Chain pointer - present only when an OPSYN 
entry with the same hash has been 
previously entered in the table. This 
pointer is the address of the previous 
entry. 


Internal 
Machine 
Code 


ASC 


Type - attribute. See Table 6. 
Rl Mask - R1 field for 
The extension of op 
omitted for machine 


entries. 


extended mnemonics. 
codes field is 
operation code 


ASC - Assembler Switch Code. (See Edited 
Text Record Fixed Field Format.) 


This format is as 


follows: 


Variable 
Chain Def. |Text form Length Type | Displace- 
pointer | Length |of literal | Attribute trans. | ment 


2 
fra 


ll bits 4 bits 1 bit 
Bit 1 


Dup. | No. of Pointer to | Exp. Scale d b 
factor | Constants | first byte | modifier | modifier poe ries 
Bytes ] 6 
mens Work 
bucket 


bucket 
External Symbol Dictionary 


Bytes 


Bytes 


Length 
modifier 


value 


count 


External symbol dictionary items are gen- 
erated by START, CSECT, private code, COM, 
DSECT, external dummy sections, ENTRY, 
EXTRN, WXTRN, and V-type DC instructions. 
Formats are described below. 


Control Sections (CSECT) and External . 
References (EXTRN/WXTRN). This format is 
as follows: 


Bytes | 3 ] 3 8 


External Symbol 


This format is as 






Name, padded 


translated. 





Entry Definitions. 
follows: 


1 3 ] 2 ] 8 
| Label 


Bytes 





Flag - Set to 1 to indicate completion of 
the item. 


Label definition ID - External symbol 
dictionary ID of the containing control 
section. 

External Dummy References (ENTRY). This 

format is as follows: 





Bytes | 


ESDNO -—- Used to refer to 
item was generated by 
reference to a DSECT. 
item was generated by 


the DSECT if this 

a Q-type address 
It is zero if the 

a DXD instruction. 


Alignment - One less than the number of 
bytes in the unit of alignment, e.g., 
7 for double word alignment. 


Literal Base Table 


This format is as follows: 


Length (8- Length (4- | Length (2- 


byte string) | byte string) | byte string) 





ESD/ID - The external symbol dictionary ID 
number of the control section where the 
literal pool is located. 


Location - This is 
tained from the 
attached to the 
ment. 


the relative address ob- 
statement work bucket 
associated LTORG state- 


A - The total object length of the literals 
comprising the 8-byte string in the 
associated literal pool. 


B - Same as A, except as applicable to the 
4-byte string. 


C - Same as A, except as applicable to the 
2-byte string. 


PHASE ORGANIZATION 
Phase F7 is organized as follows: 


1. Mainline control - IEUF7C. 
2. Functional routines. 
a. GET statement - IEUF7X. 
b. DC, DS evaluation - IEUF7D. 
c. External symbol dictionary processor - 
ITEUF7E. 


d. TESTRAN processor - IEUF7N. 


Phase F7 - Initial Assembly 43 


3. Common Subroutines (common to routines 
within Phase F7). 


a. Symbol table function - IEUF7S. 
b. Expression evaluation - IEUF7V. 
¢c. Error logging function - IEUF7L. 


d. 
e. 


Literal DC generator - IEUF7G. 
I/O Subroutines. 


IEUF7C - MAIN LINE CONTROL (FLOWCHARTS 13- 
18) 


Control is passed to Phase F7 Mainline Con- 
trol (IEUF7C) by the Phase F7 initialization 
routine, IEUF7I. 

Program modifications are made based on 
the settings of the cross-reference and 
TESTRAN option bits. IEUF7N is called by 
IEUF7C to generate TESTRAN cards for all 
edited statements if the option bit is set. 

IEUF7X is called to move the next edited 
text record into the text work area after 
putting the current (processed) text record 
onto the output file. 

The mode is tested (program modifica- 
tion). If substitution has been made, con- 
trol is passed to substitution control. 

If the type of operation is assembler 
OP, control is passed to assembler OP con- 
trol. 

Machine operations are processed, and the 
location counter incremented by the opera- 
tion length. If an external symbol dic- 
tionary identification has been assigned, 
control is passed to the external symbol 
dictionary routine to initiate private 
code. 

If a name is present, the symbol table 
is tested for possible overflow. If the 
symbol table is full, the mode is changed 
to substitution, and control passed to 
substitution control. 

If a literal is referenced in the operand 
field, control is passed to IEUF7D to make 
a literal entry in the symbol table. 

If the cross-reference bit is set, the 
Qperand is examined for references to sym- 
bols. 

The operation length is then calculated 
from the hex code. , 

Assembler operation codes are processed 
by examining the assembler switch code for 
the following: 


@® Uninitiated private code (if the ex- 
ternal symbol dictionary ID = 0). 


@e Possible symbol table overflow. 
e Location counter reference. 


@ Special cross-reference scan to generate 
cross-reference records, 


The internal hex code for assembler 
operation codes is used to compute a 
branch address to the specialized assem- 
bler operation routine. 
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In the substitution mode, IEUF7C tests 
substitution is required, a work bucket is 
attached for each symbol referenced in the 
operand. 

For machine operation codes, IEUF7C tests 
name fields for multiply defined symbols 
and evaluates literals for duplicates. 

For assembler operation codes, IEUF7C 
processes assembler operations in the sub- 
stitution mode only when substitution is 
required. 


IEUF7X - PHASE F7 GET STATEMENT ROUTINE 
(FLOWCHART 19) 


IEUF7X is used by IEUF7C to move edited 
text records into the text work area and 
put them back into the text stream. 

On all but the first time called, IEUF7X 
puts the current text record onto the text 
file by calling PUTXT. 

If an error record is in the build area, 
IEUF7X puts the error record onto the next 
record following the text record and clears 
the error record in core switch. 

If the literal switch is set, the next 
record will be moved into the text work 
area from the literal entry in the symbol 
table. Otherwise, IEUF7X calls GETPT for 
a pointer to the next text record in the 
input buffer. 

If an end-of-file is detected, IEUF7X 
moves a QUIT record into the text work area 
if the mode is assignment mode. If the 
mode is substitution, the file is TCLOSEd 
and re-opened beginning with the first text 
record. 

IEUF7X tests each text record for a 
record type if edited. If the record is not 
edited, it is put out on the output text 
file, and the next record is examined. 

Edited text records are moved into the 
text work area for processing by Phase F7. 

Edited-generated records are converted 
to suitable format for Phase F7 processing. 
The hex code is set from the operation code 
conversion table, or -- if not found 
there -- from the OPSYN chain ot the symbol 
table, and substituted fields are adjusted 
for leading and trailing blanks. 

IEUF7X sets absolute pointers to the 
operand field and appends fixed field and 
symbol work buckets (if any exists). 

The operand field on machine operations 
is scanned for literals. If an equal sign 
is found outside of quotes, the literal in 
the operand indicator is set, and the 
literal work bucket is appended to the text 
record. 

Fields are tested for legality as 
follows: 


e The name field is tested for legal char- 
acters, too many characters, and leading 
alpha character. 


@e Assembler operations are tested for 
name field required or not allowed and 
operand field required or not allowed. 


IEUF7D - DC/DS EVALUATION ROUTINE (FLOW- 
CHART 20) 


This routine is called by IEUF7C to process 
DCs, DSs, DxXDs, literals, and literal DCs. 
A complete syntax check is done for all DC 
types, and appropriate error messages are 
logged when necessary. One 15-byte DC 
work bucket is attached to the appended 
fixed field of the text record for each 
DC, DS, DXD, and literal DC operand for 
use by the Phase F8 DC evaluation routine 
(IEUF8D). In the external symbol diction- 
ary, a table entry is made for each valid 
constant in a V-type or Q- -type DC. 

One complete statement is processed in 
each pass, and control is returned to IEUF7C 
by executing an unconditional branch to 
location CTRTRN (ACT). 


LTEUF7E - EXTERNAL SYMBOL DICTIONARY 
PROCESSOR ROUTINE (FLOWCHARTS 21-23) 


This processor is called whenever any of 
the assembler operations COM, START, CSECT, 
DSECT, DXD, ENTRY, EXTRN, WXTRN, or ORG or 
a V- or Q-type address constant is encoun- 
tered. It is also called at the beginning 
and end of assembled code. Three other _ 
entry points are used for ENTRY, EXTRN, and 
control sections in the substitution mode. 
The functions performed are as follows: 


@e Generating external symbol dictionary. 
entries. 


@® Updating the location counter in external 
symbol dictionary entries. | 


@ Making symbol table entries for names in 
the statements handled. 


@® Setting and maintaining the control 
table switches CBDNO, CBDSW, CCMNO, 
CESDID, CESDNO, CNOESD, CPCNO, CTPCSW, 
CSTVAL, CSGCTR, CLASID, CTNDID, CTCMSW, 
CTESDP, CTESRN, CTESRP, CTFSTN, CTLOC, 
and CTYPE. 


@e Issuing various error messages. 


LTEUF7N - F7 TESTRAN ROUTINE 


If the TESTRAN option is exercised, control 
is passed from IEUF7C to IEUF7N after the 
process of each statement that defines a 
symbol or affects the location counter in 
any way. 

The output records (cards) of IEUF7N are 
written on SYSPUNCH and/or SYSGO data sets. 
Subsequent executions of the object program 
in the TESTRAN mode use this information. 


ES 


IEUF7S - SYMBOL TABLE SUBROUTINE (FLOW- 
CHART 24) | 


(This routine is resident in module IEURTA), 
The symbol table processor has three entry 
points in Phase F7: STPUTR, STGETR, and 
STROOM. Their function is to put symbols 
into the table, retrieve symbols from the 
table, and test whether room exists for 
another symbol. 

The symbol table and the external symbol 
dictionary share an area of main storage. 
The symbol table starts at the low-numbered 
end, and the external symbol dictionary 
starts at the high-numbered end. Room must 
be left by the symbol table for two exter- 
nal symbol dictionary segments of 260 bytes 
each (16 items 16 bytes long, plus 4 bytes 
for overflow addressing). Apart from this 
restriction, overflow does not occur until 
the external symbol dictionary and the 
symbol table are about to meet. 

STPUTR tests to see whether a duplicate 
exists and, if not, puts the given symbol 
into the table with its attributes. A type 
1 or 3 cross-reference is also made. (See 
"Cross-Reference Record Format.") 

STGETR tests whether the requested sym- 
bol is in the table and, if so, gives the 
address of the first byte in the entry after 
the name field. If not, zero is returned. 

STROOM determines whether overflow can 
Occur on the next STPUT. If so, then if 
room can be made for the symbol table by so 
doing, or if the external symbol dictionary 
processor made the call, the external sym- 
bol dictionary is put on the overflow file. 
If not, the need to enter substitution mode 
is signalled. 


IEUF7V -— EXPRESSION EVALUATION ROUTINE 
(FLOWCHART 25) 


'SPl at entry contains a pointer to the first 


character of the expression. SPl at exit 
contains a pointer to the character which 
caused IEUF7V to terminate. The terminating 
character will always be a left or right 
parenthesis, blank, or comma, unless there 
was a syntactical error, in which case SPl 
will be zero. 

SP2 at exit contains the result, if the 
expression is absolute. If the expression 
is relocatable, SP2 contains a pointer to a 
full word value followed by the RLIST. If 
the expression contains an error, SP2 is 
Zero. | 

Upon exit from IEUF7V, the condition code 
has the following meaning: 


Code Meaning 
0 absolute expression 
1 simple relocatable expression 
2 complex relocatable expression 
3 evaluation impossible (error) 
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Syntax errors cause immediate exit from 
IEBUF7V; errors other than syntax are logged, 
and normal processing is continued. 

IEUF7V has the following functions: 


e Evaluate expressions. 


@ Log type 2 cross-references (XREF) - 
(only IEUFS8V). 


@e Convert self-defining values 
(SDVCF) . 


e Detects the following errors and passes 
the information to IEUF7L: 
Relocatability error 
Self-defining value too large 
Arithmetic overflow 
Symbol not found — (IEUF8V) 

Symbol not previously defined - (IEUF7V) 
Two terms not separate 

Tllegal character 

Too many terms 

Two operators illegally coupled 

Too many levels of parentheses 
Expression end premature 

Invalid symbol 

Expression value too large 


Algorithm description: A term is a re- 
locatable or absolute symbol, a length 
attribute reference (L'sym), location coun- 
ter reference (*), or a self-defining value. 
When a term is encountered, its value is 
entered in the next available position in 
the TERMS list. If it is a relocatable 
term, the sign code and its external symbol 
dictionary ID are entered in the next avail- 
able position in the RLIST list. If it is 
an absolute term, the RLIST pointer is 
lumped to the next half-word, in effect 
putting zeros into that position, since all 
the tables are zeroed during IEUF7V ini- 
tialization. 

Type 2 cross-references are made during 
Phase F7 assignment mode. (See "Cross- 
Reference Record Format.") 

When an operator is encountered, its 
code is entered in the next available posi- 
tion in the OPRNS list, providing its 
hierarchy is greater than the previous 
operator. Hierarchy codes are as follows: 


(), b 
+ 


* 


/ 


The code 0 for a left parenthesis is 
always entered in the OPRNS list. A right 
parenthesis forces all operators in the 
OPRNS list back to the preceding left 
parenthesis. A blank, comma, or a left or 
right parenthesis which legitimately ends 
the expression forces all operators in 
OPRNS to the top of the list. An operator 
with a code less than or equal to the pre- 
vious code forces only the previous op- 
erator. 


BWNE O 
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When an operator is forced, the arithme- 
tic is performed between the last two en- 
tries in the TERMS list, and the result is 
stored in the position of the first entry 
involved in the arithmetic. Also, the sum 
of the two corresponding NTRMS entries is 
placed in the position of the first entry. 

COND is initially set to O on entry to 
TEUF7V. It is then set to 1 each time a 
right parenthesis, +, or - is encountered; 
to 2 each time an * or / is encountered; to 
3 each time an absolute term or left paren- 
thesis is encountered; and to 4 each time a 
relocatable term is encountered. The COND 
switch setting determines the validity of 
an operation. See Table ll. For example, 
/ is valid only when COND=3 (/ follows an 
absolute term or left paren.). If COND=4, 
a relocatability error is logged (/ follows 
a relocatable term). A syntax error is 
logged if COND=0 (expression begins with 
/) or if COND=1 or 2 (/ follows +, -, *, 

/, Or right paren.). 
Work tables used in IEUF7V are as fol- 


lows: 


TERMS (16 full words) - Entry is made for 
each term in the expression. At end of 
evaluation, the first full word location 
contains the final result; subsequent 
table entries contain intermediate re- 
sults. 


OPRNS (20 bytes) - Entry made for each 
operator in the expression. 


NTRMS (16 bytes) - A 2 is entered for each 
term. At end of evaluation, the first 
byte contains a value equal to twice the 
number of terms in the expression. 


RLIST (16 half-words) - Sign code (1 for+, 
2 for -) and external symbol dictionary 
ID are entered for each relocatable term; 
zeros appear for each absolute term and 
undefined symbol. During addition and 
subtraction, RLIST entries are zeroed 
when the signs are opposite and the ex- 
ternal symbol dictionary IDs are the 
same. 


Upon exit, a simple relocatable expres- 
sion will have a + Sign and the external 
symbol dictionary ID of its impaired posi- 
tive term in the first half-word, and the 
remaining 15 half-words will contain zeros. 
A complex relocatable expression at exit 
will have a non-zero half word for each un- 
paired relative term. The non-zero half 
words will be scattered in the table. A 
complex relocatable expression may also 
be the result of a single unpaired negative 
term. A minus sign (-) and the external 
symbol dictionary ID of this term will ap- 
pear in the RLIST. 


Table ll. 


Character Previous 
Encounterd Setting 
a 


0/1/2 


Condition Switch Settings 


Flowchart 
— 









Action 


set COND = 0 






set COND = 








if PCENTR> 4, log error EPAR 
IEU026 
0/1/2 log error 1EU085 
set COND = 3 RRAR 
if PCNTR = 0, end of expression 
see ae set COND = LTCOM 
0/1/2 


| tog error 1EUBS error [EU085 LOOP 


set COND = 4 
(* is location counter ref.) 
ee er ee error IEUO85 LTCOM 
set COND = 2 
(* is mult.) 
wa log error JEU025 











set COND = LTCOM 
log error 1EU085 

LOOP 
log error IEU0Q25 


absolute term ia log error IEU085 
0/1/2 set COND = 3 


relocatable i set COND = 4 
term — log error JEU025 


0/1/2 








Term 
Computing 
Routines 


log error IEUO85 
0/1/2 log error |EU039 


if PCNTR)> 0, log error BLCOM 
[EU039 


TEUF7L - ERROR LOGGING FOR PHASE F7 AND F8 
(FLOWCHARF 26) 

(This routine is resident in module IEURTA), 
This routine is called to attach error mes- 
sages to an edited text record. 

IEUF7L tests the error switch in the con- 
trol table to determine if an error record 
for the current text record is in the error 
record build area. If there is, the error 
count is compared with the maximum allow- 
able number of errors (16). If the count 
is equal to the maximum, the current and 
all subsequent error messages are ignored. 

If there is no error record in the build 
area, I[LEUF7L tests the “error record fol- 
lows" bit in the text record. If the bit 
is set, the error record is moved into the 
build area from the text file. If not, the 
error record is initialized in the build 
area, and the "error record follows" bit 
(TXERI) is set in the text record. In 
either case, the error switch in the control 
table is set for subsequent calls on the 
current text record. 

The error message is added to the error 
record, and the error count is incremented 
by one. 

The relative column pointer is added to 
the error message. If no column pointer is 
required, it is set to zero. 

Control is then returned to the calling 
routine. 


, or blank 


CTCLBT (2 bytes) 


ITEUF7G - LITERAL DC GENERATOR (FLOWCHART 27) 


IEUF7G is a routine which builds a literal 
DC edited text record for an outstanding 
literal entry in the symbol table. IEUF7X 
invokes IEUF7G once for each literal DC 
that is to be built into the edited text. 
ITEUF7G then moves in pertinent information 
such as the record length, record type X'60' 
for edited generation, operation type X'80' 
for assembler, operation code X'25' for 
literal, and operation and name field 
lengths of zero. After the text has been 
generated, control is returned to the 
caller. 


TEUF7I - PHASE F7 INITIALIZATION AND I/O 
INITIALIZATION 


The I/O portion of phase initialization 
OPENs the three utility files. BSAM logic 
including READ, WRITE, CHECK, and TCLOSE 
are employed for all data sets. QSAM logic 
(PUT) is used for the SYSGO and SYSPUNCH 
data sets. The routine initiates a READ of 
the first block of the text stream and 
initializes text, literal base table, 
cross-reference pointers. 

F7IO functions for PHCLS, GETPT, GETXTM, 
PUTXT, CLSTXT, CWRESD, CRDESD, PUTXRF, 
PUTLBT, and SYSO are described below. 

The root segment transfers control to F7 
which in turn transfers to IEUF7C. 


and 


PHCLS -—- Phase Close 


The I/O portion of the phase close function 
closes SYSUT1, SYSUT2, and SYSUT3 and in- 
serts the following parameters into the I/O 
portion of the assembler control table: 


CTXUIN (1 Byte) - Data file designator for 
the current input text. 


CTOUT2 (1 byte) - Data file designator for 
the alternate overflow file (other than 
SYSUT3). 


CTRLBT (4 bytes) - Pointer to the first 
literal base table block on the overflow 
file, SYSUT3. 


- Count of the number of 
literal base table physical blocks which 
have been written onto SYSUT3. 


CTRXRF (4 bytes) - Pointer to the first 
cross-reference table block contained 
on the overflow file, SYSUT3. 


CTCXRF (2 bytes) - Count of the number of 
cross-reference physical blocks which 
have been written onto SYSUT3. 


CTONWP (8 bytes) - Pointer to the next 


sequential write position on the over- 
flow file, SYSUT3. 
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Prior to TCLOSEing SYSUT3, the literal 
base table pointers are tested to deter- 
mine if any literal base table entries 
have been made. If so, an end-of-file 
label is embedded into the literal base 
table stream, and the partially filled 
block is written onto the overflow file, 


SYSUT3. If no literal base table entries 
have been made, then CTCLBT is cleared to 
zeros. 


PHCLS may be called by an unconditional 
branch to PHCLS. The routing ultimately 
transfers control to the root segment for 
calling the next phase. 


GETPT - Get Point 


GETPT points to the next logical text 
record within the input text stream. 


The calling sequence is 


Calling Sequence. 
as follows: 


Input Parameters: None 

Entrance Procedure: L SRB, CTXTIO (ACT) 
BAL SRR, GETPT (SRB) 
(Normal return) 


Output Parameters: 

SP1=FBA First byte address of the 
first segment of a logical 
text record. 

=0 End of file was read, the text 
stream has terminated. 
First byte address of the 
second segment of a "broken" 
logical text record. 
=O Text record was not broken, 
consequently no second seg- 
ment. 


SP 2=FBA 


Method. GETPT double-buffers the text 
stream. Logical buffers may be split be- 
tween two physical blocks. The routine 
points to each record in sequence. The 
pointer is pointing to the most significant 
byte of the record length indicator (RLI). 


Restrictions and Assumptions. The "last 
record bit" contained within FLAGA must 
be set to terminate the input text stream. 
A logical record must be contained within 
two physical blocks. 


GETXTM - Get Text and Move 
GETXTM transfers a logical record from the 
input text stream to an area specified by 


the user. 


The calling sequence is 


Calling Sequence. 


as follows: 
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LNPUt FraLamwcleLtss 
SP1=FBA First byte address of the area 
to which the record is to be 
transferred. 


Entrance Procedure: L SRB, CTXTIO (ACT) 


BAL SRR, GETXTM(SRB) 
(Normal Return) 


Output Parameters: 
SP1=FBA First byte address of user's 
work area (same as on input). 
=O End-of-file was read; the text 
stream has terminated. 


Method. Upon entering, GETXTM tests a 
global switch which is set by the GETPT 
subroutine. If the switch is set, GETXTM 
clears the switch and transfers the record 
that is currently being pointed. If the 
switch is not set, GETXTM calls GETPT to 
point to the next logical record in the 
input text stream. GETXTM then transfers 
that record to the user's work area. Thus, 
if the user wishes the next logical record 
moved to his work area, he can call GETXTM 
without first calling GETPT. 

If the text record is segmented, the 
routine joins the two segments together to 
produce a single contiguous record. In so 
doing, it drops the second record length 
indicator and updates the first record 
length indicator to the total record byte 
count. In addition, the "break flag bit" 
contained within FLAGA is cleared to zero. 


PUTXT - Put Text 


_ PUTXT retrieves a logical record from the 


input buffers or from an area specified by 
the user, and transfers the record to the 
output buffers for eventual output to a 
utility data set. 


Calling Sequence, The calling sequence is 


as follows: 


Input Parameters: 

SP1=FBA First byte address of the text 
record contained in the user's 
work area. 

=0 A flag to indicate the record 
to be PUT is contained ina 
text input buffer. 


Entrance Procedure: L SRB, CTXTIO (ACT) 
BAL SRR, PUTXT (SRB) 
(Normal return) 


Output Parameters: 
SP1=FBA;, First byte address of the text 
record contained in the user's 
work area (same as input). 


=FBA, First byte address of the text 
record contained in the output 
buffer if record was trans—- © 
ferred from the input buffer. 
End-of-file was read while 
trying to PUT the next logical 
record from the input text 


stream. 


Method. If SPl is zero, PUTXT sets a global 
switch and calls GETXTM. GETXTM tests the 
Switch and, if set, transfers the text rec- 
ord from the input buffer to the output 
buffer. If the GETPT global switch is not 
set, GETXTM will call GETPT to point to the 
next logical record. Thus, the next logical 
record in the text stream can be trans- 
ferred directly to the output buffer by 
simply calling PUTXT without first calling 
GETPT or GETXTM. 

If SPl is non-zero, the record is trans- 
ferred from the area specified by SP1l into 
the output buffer. 


Restrictions and Assumptions. A logical 
record must not exceed in length one physi- 


cal output block. 


CLSTXT —- Close Text 


CLSTXT TCLOSEs the input text file, embeds 
an end-of-file label into the output text 
stream, and TCLOSEs the output text file. 
In addition, it interchanges the utility 
file designators such that the current in-. 
put text file becomes the future output 
text file, and the current output text file 
becomes the future input text file. 


The calling sequence is 


Calling Sequence. 


as follows: 


Input Parameters: None 
Entrance Procedure: L SRB, CTXTIO (ACT) 
BAL SRR, CLSTXT (SRB) 
(normal return) 
Output Parameters: None 
Method. The output buffer management sub- 
routine is called, an end-of-file label is 
embedded into the output text stream, and 
the output file is TCLOSEd. The I/O 
designators are interchanged, and the text 
buffer pointers are initialized. This 
routine is called by PHCLS. Hence, unless 
the phase anticipates an iteration on the 
text stream, this routine should not be 
called by mainline control. 


CWRESD - Write External Symbol Dictionary 


CWRESD writes the external symbol diction- 
ary (ESD) onto the overflow file, SYSUT3, 
and NOTEs its position for future reference. 


The calling sequence is 


Calling Sequence. 
as follows: 


Input Parameters: 
SP1=FBA First byte address of the 
external symbol dictionary. 


Entrance Procedure: L SRB, CTXTIO (ACT) 
BAL SRR, CWRESD (SRB) 
(Normal return) 


Output Parameters: 
SP1=NOTEd record position on the over- 
flow file. 


Method. The routine tests the write posi- 
tioning required switch. If set, the file 
is POINTed to the next write position. If 
not set, the file is assumed positioned 
for the next write. The external symbol 
Gictionary block is then written onto the 
overflow file and its position NOTEd. The 
note label is passed on to the user for 
future reference. 


Restrictions and Assumptions. The routine 


does not keep count of the number of ex- 
ternal symbol dictionary blocks read or 
written. It assumes the user is requesting 
a block which has been previously written. 


CRDESD - Read External Symbol Dictionary 


CRDESD POINTs the overflow file to the re- 
quested external symbol dictionary and | 
reads it into an area specified by the 
caller. 


Calling Sequence. 


The calling sequence is 
as follows: ? 


Input Parameters: 


SP1=L A NOTEdG record position used to 
POINT to the desired external 
symbol dictionary segment. 

SP2=FBA First byte address of user's 


input area. 


Entrance Procedure: L SRB, CTXTIO (ACT) 
BAL SRR, CRDESD (SRB) 
(Normal return) 
¢ 
Output Parameters: None 
Method. Using SP1, the overflow file is 
POINTed to the requested external symbol 
dictionary, the external symbol dictionary 
is read into the area specified by SP2, 
and the write positioning required switch 
is set. 


Restrictions and Assumptions. The routine 
does not keep count of the number of ex- 


ternal symbol dictionary blocks read or 
written. It assumes the user is requesting 
a block which has been previously written. 
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PUTXRF - Put Cross-Reference 


PUTXRF points to the next available area in 
the cross-reference output area for building 
a cross-reference logical record. 


Calling Sequence, The calling sequence is 


as follows: 


Input Parameters: None 


Entrance Procedure: L SRB, CTXTIO (ACT) 
BAL SRR, PUTXRF (SRB) 
(Normal return) 


Output Parameters: ? 


SP1=FBA First byte address of the next 
available record location con- 
tained within the cross- 
reference (XRF) buffer. 

Method. The routine is called each time a 


cross-reference record is to be built. The 
routine advances through the buffer at 17- 
byte increments until the block is filled. 
At this point, the buffer is written onto 
the overflow file at the next available 
write position. The first block written 
onto the overflow file is NOTEd for future 
reference. 


Restrictions and Assumptions, The routine 
assumes a record will be built at the 


POINTed location since it merely advances 
to the next 17-byte location each time it 
is called. ' 


PUTLBT - Put Literal Base Table 


PUTLBT points to the next available area 
in the literal base table output area for 
building a literal base table logical 
record. 
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The calling sequence is 


Calling Sequence. 
as follows: 


Input Parameters: None 


Entrance Procedure: IL SRB, CTXTIO (ACT) 
BAL SRR, PUTLBT (SRB) 
(Normal return) 


Output Parameters: 


SP1=FBA First byte address of the next 
available record location con- 
tained within the literal base 
table buffer. 

Method. The routine is called each time a 


literal base table record is to be built. 
The routine advances through the buffer at 
13-byte increments until the block is filled. 
At this time the buffer is written onto the 
overflow file at the next available write 
position. The first block written onto the 
overflow file is NOTEd for future reference, 


Restrictions and Assumptions. The routine 
assumes that a record will be built each 


time it is called since it merely advances 
to the next 13-byte location. 


SY¥SO - System Output 


SYSO outputs 80-character logical records to 
either the SYSPUNCH or SYSGO data sets or to 
both. On entry, SPl points to the first 
byte of an 8l-character buffer where the 
first character is an internal control char- 
acter. SYSO tests the SYSPUNCH and the 
SYSGO option bits. If either one is set, 
the contents of the 8l-character buffer (ex- 
cept for the control character) are trans- 
ferred accordingly to the SYSPUNCH or SYSGO 
data sets. If both are set, the contents 

of the buffer are transferred to both data 
sets. 


OVERALL OPERATION (FLOWCHART 28) 


The main function of Phase FI (F Interlude) 
is to write the external symbol dictionary 
on the SYSPRINT, SYSPUNCH, and/or SYSGO 
data sets. External symbol dictionary 
segments and literal pool bases are located 
either in main storage or in an overflow 
segment on SYSUTI1. 


I/O FUNCTIONS 


Phase FI processes literal base table and 
external symbol dictionary entries gener- 
ated in Phase F7 and outputs literal ad- 
justment table entries. See Figure 12. 
The literal base table and literal adjust- 
ment table are passed at the GET/PUT logical 
record level, and the external symbol dic- 
tionary input is called at the READ level. 
The I/O subroutines interface with the 
operating system at the READ/WRITE level 
only, performing their own blocking and de- 
blocking functions for the logical record 
entries. The system output routines SYSO 
and SYSL are called to output external 


symbol dictionary data. 


External 
Symbol 
Dictionary 
External 
Symbol 
Dictionary 


an 


Literal Base Table 
External Symbol 


External Symbol 
Dictionary Overflow 


Dictionary 


Phase 
FI 
Main 
Storage 


*If symbol table overflow occurred in Phase F7, 
SYSUT1 may be used instead of SYSUT2. 


Literal Adjustment 
Table 


o. 


Figure 12. I/O Flow for Phase FI 
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LITERAL ADJUSTMENT TABLE FORMAT 


The format for the literal adjustment 
table is as follows: 


3 ] 3 1 3 1 3 
ESD ESD 
Bo oanaee 
ESD/ID — External symbol dictionary identi- 
fication of the 3 bytes (A) that imme- 


diately follow this byte. Typical of 
four shown. 


Bytes 1 





A — The adjusted assembler address of the 
beginning of the 8-byte string of 
literals whose pool is described by this 
table. 


ESD/ID — Same as previously described (for 
A). 


B — Same as A, except as applicable to the 
4-byte string. 


ESD/ID — Same as previously described (for 
A). 


C — Same as A, except as applicable to th 
2-byte string. , 


ESD/ID — Same as previously described (for 
A). | 


D — Same as A, except as applicable to the 
l-byte string. 


NOTE: There is one such table for each 
LTORG statement or for the END assembler 
instruction in the program. 


Trailer — Indicates the end of the Literal 
adjustment table. This format is as 
£ollows: 


Bytes ] ] ] 1 





T/O SUBROUTINES 


FII — FI Initialization 


The I/O portion of phase initialization 
determines if any literal base table entries 


had been output from Phase F7. If so, the 
first literal base table block is read 
from the overflow file, SYSUT1, and the 


pointers to the first logical record entry 
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within the block are initialized. Control 
is then transferred to the mainline con- 
trol driver. 

Phase IEUF7I (the Phase F7 I/O routine) 
transfers control to FII which in turn 
transfers to Phase FI mainline control. 


FICLS — FI Phase Close 


The I/O portion of the phase close function 
embeds an end-of-file label into the literal 
adjustment table output stream and writes 
the last literal adjustment table block 

onto the alternate overflow file. SYSUT1 
and the alternate overflow file are 

TCLOSEd, and the following entry is placed 
into the assembler control table: 


CTCLAT — Count of the number of physical 
literal adjustment table blocks which 
have been written onto the alternate 
overflow file. 


Control is then transferred to the next 
phase. 

FICLS should be called only after main- 
line control has finished its phase. FICLS 
may be called by an unconditional branch 
to FICLS. 


GETLBT — Get Literal Base Table 


GETLBT points to the next logical record 
entry contained within the literal base 

table input area. 
Calling sequence. The calling sequence is 
as follows: 


Input Parameters: None 


Entrance Procedure: BAL SRR, GETLBT 


(Normal return) 


Output Parameters: 

SPl = FBA First byte address of next 
logical record in the lit- 
eral base table input buffer. 

= 0 End-of-—-file was detected; 
there are no more literal 
base table records. 
Method. The subroutine is called each 


time a literal base table logical record 
is required. The routine advances through 
the buffer at 13-byte increments until the 
entire block has been processed, at which 
time the next literal base table physical 
block is read from the overflow file. If 
either an end-of-file label is detected or 
the block count becomes zero (whichever 
appears first), the end-of-file flag is 
set, and control is passed to the caller. 
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Method. 


RDESD — Read External Symbol Dictionary 


RDESD POINTs the overflow file to the 
requested external symbol dictionary and 
reads the block into an area specified by 
the caller. RDESD is embedded into the 
section LPFI2. LPFI2 reads the entire 
external symbol dictionary into core, seg- 
ment by segment. Logic is identical with 
Phase F7 RDESD. 


PUTLAT — Put Literal Adjustment Table 


PUTLAT points to the next available area 
in the literal adjustment table output 
area for building a literal adjustment 
table logical record. 


Calling Sequence. 
as follows: 


The calling sequence is 


Input Parameters: None 


BAL SRR, PUTLAT 
(Normal return) 


Entrance Procedure: 


Output Parameters: 
= FBA First byte address of the 
next available record lo- 
cation contained within the 
literal adjustment table 
output buffer. 


SPl 


The routine is called each time 
a literal adjustment table logical record 
is to be built. The routine advances 
through the buffer at 16-byte increments 
until the block is filled, at which time 
the buffer is written onto the alternate 
overflow file. The alternate overflow 
file is designated as that file which is 
neither the prime overflow file, SYSUT3, 
nor the current text file. Which file is 
designated is contingent on the number of 
passes through the text stream which were 
executed by the previous phase, Phase F/7. 


SYSL — System List 


SYSL outputs a 121l-character line to the 
system list data set, SYSPRINT. 


Calling Sequence. 


The calling sequence is 
as follows: : 


Input Parameters: 


SPl = FBA First byte address of a 121- 
Character formatted print 
line. The first character 


is the internal control 


character. The numeric 
value of the first charac- 
ter dictates the number of 
lines to be spaced prior 
to listing the formatted 


line. Zero is single spac- 
ing, 63 or greater is page 
eject. 


Entrance Procedure: BAL SRR,SYSL 


Output Parameters: None. 

Method. The SYSL option bit is tested. 
If set, the Line is written on SYSPRINT. 
If not set, a simple return is executed. 
The user should not concern himself as 
to whether the line was written or not. 


SYSO — System Output 


This subroutine outputs an the contents of 
the 8l-character bufter (except for the 
control character) to either the SYSPUNCH 
or the SYSGO data sets. 


Calling Sequence. 
as follows: 


The calling sequence is 


Input Parameters: 


SPl = FBA First byte address of an 


8l-—-character buffer where 


the first character is an 
internal control character. 


Entrance Procedure: BAL SRR, SYSO 


Output Parameters: None 

Method. SYSO tests the SYSPUNCH and the 
SYSGO option bits. If either is set, the 
contents of the 8l-character buffer (except 
for the control character) are transferred 
to the data sets indicated. 


MAIN LINE CONTROL 


If the external symbol dictionary is not 
in core, it is fetched one segment ata 
time using the segment residence table. 
The adjustment table is constructed from 
control sections on the external symbol 
dictionary by accumulating their lengths 
and aligning to the next higher double 
word. 

Another pass through the external 
symbol dictionary outputs the listing and 
cards item by item. These consist of 


name, type, ID, address, length, and 
LDID, aS appropriate, on the listing; and 
name, type, address alignment, and length 


or LDID on the cards, with one ID per 
card to identify its first SD, PC, ER, WX, 
CM, or XD type. | 

The adjustment table built in FI3 and 
the literal base table are used to build 
the literal adjustment table. 

The adjustment table is resident in 
module IEURTA and overlays IEUF7S and 
TEUF7L. 
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PHASE F8 — FINAL ASSEMBLY 


OVERALL OPERATION (FLOWCHARTS 29-36) 


Phase F8 makes the final pass through the 
program text, which is read from SYSUT1 
or SYSUT2, depending on the number of 
iterations. During this pass, any oper- 
ands which were not processed by Phase F7 
are processed from the last symbol table 
created during that phase. 

Any self-defining values which were not 
converted to their binary values are now 
processed. All address expressions are 
evaluated, and the results are substituted 
for the expressions. Addresses are re- 
structured into a base register and dis- 
placement format. 

At the same time, the completely 
assembled text is written in relocatable 
object program format on SYSPUNCH or 
SYSGO, and in program listing format on 
SYSPRINT. 

Invalid statements are flagged on 
SYSPRINT. Error records together with the 
statements flagged are created and written 
on the overflow file, SYSUT3, to be listed 
by the Post-Processor Phase. 

The relocation dictionary is built 
during Phase F8, and segments can overflow 
onto SYSUT3. 


I/O FUNCTIONS 


Phase F8 passes through the text stream 
once scanning the logical text records 
which were output from Phase F7. See 
Figure 13. The phase inputs the literal 
adjustment table blocks from the alternate 
overflow file and outputs cross-reference, 
relocation dictionary, and diagnostic rec- 
ords with flagged statements onto the over- 
flow file for subsequent processing by the 
Post-Processor Phase. The cross-reference 
and relocation dictionary records are output 
at the PUT level where the cross-reference 
records are inserted into the cross-refer- 
ence output stream from where they left off 
in Phase F7. Error records are output at 
the WRITE level. In addition, records are 
output to the SYSPRINT, SYSPUNCH, and SYSGO 
files via the output subroutines SYSL and 
SYSO. 


RELOCATION DICTIONARY ENTRY FORMAT 
Bytes 


1 1 1 3 
Table Position Relocation Symbol 
ID ESD/ID ESD/ID address 


Table ID -- Each group of 20 RLD entries is 


This format is as follows: 





preceded by a 1-byte table identifier of '08'. 
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FH £E 


vou PUNCH, 
REPRO 
Text input 
from Phase 7 a 
REPRO 
Phase 
F8 
Literal Adjustment thd oe : 
Table f elocation Dictionary 
ee Adjustment Flagged statements 
Table 
Symbol Table 
Literal Table 
Main 
Storage 


*If symbol table overflow occurred in Phase F7, 
SYSUT1 and SYSUT2 may be reversed. 


igure 13. 1/0 Flow for Phase F8& 


Postion ESD/ID — Number of the control sec- 


tion where the address constant is located. 


Relocation ESD/ID — Number of the control 


section where the symbol is defined. 


Flag — 


Bits O-1 00 
Bits 2-3 00 - A-type and Y-type address 
constants and CCW. 
Ol - V-type address constant. 
10 - Q-type address constant. 
li - CXD. 


Bits 4-5 Length of address constant 
minus one (L-1). 
Bit 6 External symbol dictionary 
(ESD) ID sign. 
O —plus (+) 
1 — minus (-) 
Bit 7 O — next entry on the same card 
has the same position ID 
and the same relocation ID. 
1 — next entry on the same card 
has a different position 
ID and/or relocation ID. 
NOTE: There is no carry-over from card 


to card. That is, the last entry ona 
card always has al in bit position 7 
even if the first entry on the next card 
has identical position ID and relocation 
ID fields. 


Symbol address - Assembler assigned address 
of a symbol used in A-, Y-, or V-type 
address constants, or of the second — 
operand of CCW. 


PHASE ORGANIZATION 


The following control sections comprise 
Phase F8: IEUF8I, IEUF8C, I[EUF8M, IEUF8A, 
IEUF8P, IEUF8D, IEUF8V, IEUF8L, IEUF8N, 
and IEUF8S. These are self-contained 
routines which may be link-edited separate- 
ly. Communication between routines is via 
registers and the ACT table. When IEUFI 
passes control to Phase F8, the above 
routines are loaded into core and remain 
there until the completion of Phase F8 
execution. 


ITEUF8I -- PHASE F8 INITIALIZATION AND I/O 


On entry to Phase F8, the overflow file, 
SYSUT3, is positioned for writing the relo- 
cation dictionary and diagnostic records. 
If any literal adjustment table records 
were written by Phase FI, the first literal 
adjustment table block is read from the 
alternate overflow file. The literal 
adjustment table pointers are initialized 
to point to the first logical record 
contained within the literal adjustment 
table input area. GETMAIN for a buffer to 
contain flagged statements is issued, if the 
TERM option is in effect. The relocation 
dictionary type indicator is inserted into 
the first byte of the relocation dictionary 
output buffer (the cross-reference output 
buffer was initialized in Phase F7), and 
control is transferred to Phase F8 main- 
line control, IEUFS8C. 


IEUF8I SUBROUTINES 
GETXTM -- Get Text and Move 


GETXTM retrieves the next logical record 
from the input text stream and moves the 
record to an area specified by the user. 
Each time the routine is entered, a pointer 
is advanced to the next logical record in 
the input text stream. The record is 
moved from the input buffers to an area 
specified by SPl. The input stream is 
double-buffered to increase input speed 
and processing efficiency. If an end-of- 
file label is encountered, the EOF flag is 
set and passed to the caller. GETXTM sets 
a switch which prevents any further 
processing of the text stream. 


GETLAT -- Get Literal Adjustment Table 


GETLAT points to the next literal adjustment 
table logical record contained within the 
literal adjustment table input area. The 
routine is called each time a new literal 
adjustment table record is desired. On exit, 
SPl contains the first byte address of the 


next literal adjustment table logical 
record. The routine advances through the 
buffer at 16-byte increments until the 

block is empty, at which time the next block 
is read from the alternate overflow file. 
SPl returns with 0 if there are no more 
literal adjustment table entries. 


PUTRLD -- Put Relocation Dictionary 


PUTRLD points to the next available area in 
the relocation dictionary output area for 
building a relocation dictionary logical 
record. The routine is called each time a 
relocation dictionary is to be built. SPl 
returns with the first byte address of the 
next available record location in the relo- 
cation dictionary output buffer. The rou- 
tine advances through the buffer at 6-byte 
increments until the block is filled, at 
which time the buffer is written onto the 
overflow file, SYSUT3. The first block 
written onto the overflow file is NOTEd for 
future reference. : 


PUTXT -- Collect Flagged Statements 


If the TERM option is in effect PUTXT 
collects the flagged statements and outputs 
them on SYSUT3. The routine is called each 
time a source record is moved to the 

SYSPRINT buffer. The routine puts the 

record in a buffer set aside for this purpose 
(see Figure 16). When an error is found or 
the buffer has been filled, and the last 
source record moved into the buffer contains 
a continuation character, the buffer is 
written on SYSUT3. For a valid statement 
exceeding six records a POINT is made. Other 
valid statements are not written on SYSUT3. 


WIERR -- Write Error Message 


WIERR outputs an error record onto the over- 
flow file for eventual listing by the Post 
Processor Phase, Phase FPP. | 

WTERR is called with SPl pointing to the 
first byte of an error record. 


SYSL -- System List 


SYSL outputs a 120-character line to the 
SYSPRINT file. On entry, SPl points to the 
byte of a 121l-character formatted printer 
line. The first character is the carriage 
control character. The numeric value of 
the first character dictates the number of 
lines to be spaced prior to listing the 
formatted line. Zero is single spacing, 
63 or greater is page eject. The SYSPRINT 
option bit is tested. If set, the line is 
transferred to the SYSPRINT data set. If 
not set, a simple return is executed. 


SYSO -- System Output 


(See the description of SYSO under IEUF71 
in Phase F7.) 
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PHCLS -- Phase F8 Close 


The phase close subroutine TCLOSEs the text 
file, embeds end-of-file labels into the 
relocation dictionary output stream, and 
writes their buffers onto the overflow 
file. The following nine parameters are 
passed to the Post Processor Phase through 
the assembler control table: 


CTPCHI (1 byte) - Option bits for DECK, 
LOAD, RENT, LIST, ALGN, DOS, XREF (in 
that order). 


CTTRMI (1 byte) - Option bits for TEST, 
TERM, NOM, STMT. 


CTCXRF (2 bytes) - Count of XREF blocks 
contained on the overflow file. 


CTCRLD (2 bytes) - Count of relocation 
dictionary blocks contained on the 
overflow file. 


CTCERR (2 bytes) - Count of the number of 


error messages contained on the overflow 
file. 
CTRXRF (4 bytes) - Location of the first 
XREF block located on the overflow file. 
CTRRLD (4 bytes). - Location of the first 


relocation dictionary block located on 
the overflow file. 


CTRERR (4 bytes) - Location of the first 
diagnostic message located on the over- 
flow file. 


CESDNO (2 bytes) - Deck number. 
CTITLE (4 bytes) - Deck identification. 


PHCLS transfers control to IEUFPP, the Post 
Processor Phase. 


IEUF8C -— MAIN LINE CONTROL (FLOWCHART 29) 


Control is passed to IEUF8C for each rec- 
ord; IEUF8C in turn passes control to the 
various routines necessary to process that 
particular record. Program sequences 
within the mainline control that perform 
specific functions are described below. 


LEUF8C SUBROUTINES 


ERLOD8 


Errors encountered in Phase F8 for a rec- 
ord are appended to the corresponding Phase 
F7 error record and are put in the record 
work area F8WORK (ACT). 


ENDOFF 
ENDOFF processes any error encountered in 


the final record and exits to the IEUF8I 
phase close routine. 
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SETWBP 


CTXWBP (ACT) points at the first symbol work 
bucket in the input record. If there are 

no symbol work buckets, CTXWBP(ACT) will be 
set to zero. CTXABP(ACT) is set to point at 
the appended fixed field of the input rec- 
ord. 


SRLIGN 


SRLIGN makes alignments as necessary on all 
machine ops, literal DC, DC, DS, CCW, and 
CNOP. TXALIN in F8WORK(ACT) is investigated. 
If this 3-bit designator is non-zero, one 
to seven alignment bytes are output. 


IEUF8M - MACHINE OPERATION PROCESSOR 
(FLOWCHART 30) 


IEUF8M processes the operand field of all 
machine ops. Decomposition, adjustment, 

and formating occurs in this routine. The 
decomposition routine Using table is shown 
in Figure 14. IEUF8M is entered from the 
ITEUF8C routine. FRB (Register 12) is loaded 
with the base address of IEUF8M. Control is 
passed to the assembler control table where 
registers 4, 5, 6, and 7 are saved. Control 
is then passed to the address in FRB. 


LTEUF8M SUBROUTINES 


RRL, RR2, RR3, RR4, RX1, RX2, RSL, RS2, ST3, 
ol4, SS1, SS2 


These subroutines scan the operand fields 
of machine operations. They do a syntax 
check and format the instruction building 
area, F8INST(ACT). See Figure 15. 

These subroutines call on lower level sub- 
routines which do semantic checks, and call 
on another set of subroutines which do ex- 
pression evaluation and decomposition. 

RR4 refers to extended mnemonic register- 
to-register instructions. RX2 refers to 
extended mnemonic register-to-indexed- 
storage instructions. | 

F8AREX does a complete syntactic scan on 
each expression and sets a group of semantic 
flags. The necessary flags are investigated 
by the individual routines, and error proce- 
dures are taken where necessary. 


IEUF8A - ASSEMBLER OPERATION PROCESSOR 
(FLOWCHART 31) 


IEUF8A processes the following assembler 
Ops: 


Using 
Table 


Pointer 


Using Table 


oOo ON OW NH FR WH bY 


—t aoa 
— CC) 


12 


epee a | ae 


00 — Register not used External Value 
: ; Symbol 
FF 16 — Register in use Dictionary 
iD 


The Using table is used by the decomposition routine, The using 
table pointer and the using table are parallel tables. Every 
decomposable value is checked against the complete table for 
possible decomposition, 


Decomposition Routine Using 
Table 


Figure 14. 


MNOTE, PRINT, SPACE, EJECT, PUNCH, REPRO, 
TITLE, ENTRY, EXTRN, WXTRN, START, CSECT, 
' DSECT, COM, EQU, ORG, END, LTORG, USING, 
DROP, literal DC, DC, DS, CCW, and CNOP. 
IEUF8A is entered from the IEUF8C rou- 
tine. FRB (register 12) is loaded with the 
base address of IEUF8A, and control is 
passed to the assembler control table where 
registers 4, 5, 6, and 7 are saved. cCon- 
trol is then passed to the address in FRB. 


IEUF8A SUBROUTINES 


PRINTB 


This routine investigates the operand field 
of all print statements. A syntax check 

is made, and from one to three conditions 
are set per statement. 


ON sets F8PON (ACT) to 0 
OFF sets. F8PON (ACT) to. FFig 
sets F8PGEN (ACT) to 6) 


GEN 


NOGEN sets FS8PGEN(ACT) to FFj¢ 
DATA sets F8PDAT(ACT) to 0 
NODATA sets FS8PDAT(ACT) to FFi¢ 
SPACE 


The SPACE routine does a complete syntax 
check and, if necessary, checks semantics, 
and does expression evaluation. A switch, 
SPACSW(ACT), is set to FF,¢ on a valid 


' SPACE statement and to AaA16 on an error 
1 


condition. SP2 (register ) is set to the 
number of lines to be spaced. 


BJ ECT 





In this routine, a switch, EJCSTW(ACT), is 


set to FFi6- 


PUNCHB 

In this routine, a switch, REPSW(ACT), is 
set to l. 

REPRO 

In this routine, a switch, REPSW(ACT), is 
set to 3. 

TITLEB 

In this routine, a switch, REPSW(ACT), is 
set to 7. 

MNOTST 

In this routine, a switch, REPSW(ACT), is 
set to 15. 

ENTRYB 


The ENTRYB routine in Phase F8 is only an 
error checking routine. All actual proc- 
essing has been completed in Phase F7, 


EXT RNB 


The EXTRNB routine returns control to main- 
line control. EXTRN and WXTRN processing 
is completed in Phase FI. | 


STARTB 


The start routine checks the private code 
switch, CTPCSW(ACT). If private code is 
not initiated, the non-reentrant switch is 
turned on. If private code has been ini- 
tiated, the start statement is ignored, 
and control is immediately returned to 
Phase F8 main line control. 
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-—$———————___—__—_—_—_— Location $+ 


F8INST (ACT) +] 


Iylob 
Ry,l] | Ro,R3,X9,b9 


By, Boa ++ D1,D90 ————| 


Operation Code 


+2 +3 


+4 +5 +6 +7 +8 


}_~_—_____ Absolute Operand 1 address ig Absolute operand 2 


+9 +10 +11 


address —_—_—_>| 


Indicator bits | 






eFigure 15. Instruction Building Area 


CSECTB 


The CSECTB routine checks if the new exter- 
nal symbol dictionary ID is different 

from the current external symbol dictionary 
ID. If not, control is immediately re- 
turned to Phase F8 mainline control. I€£ 
different, current type, external symbol 
dictionary ID, and current adjustment base 
are set, and the non-reentrant switch is 
turned on. 


DSECTB 


The DSECTB routine checks if the new exter- 
nal symbol dictionary ID is different 

from the current external symbol dictionary 
ID. If not, control is immediately re- 
turned to Phase F8 mainline control. If 
different, current type and external sym- 
bol dictionary ID are set. Current adjust- 
ment base is set to zero, and the non- 
reentrant switch is turned off. 


58 


+12 +13 


EA2 (address field 2 contains an entry) 
EA1 (address field 1 contains an entry) 


DC instruction 
L Alignment before instruction 


COMB 


The common routine is the same as the DSECTB 


routine. The non-reentrant switch is turn- 
ed on. 
NOTE: The reentrant error switch, CTRENT- 


(ACT), is a one-byte cell set by an ini- 
tialization routine to zero. A violation 

of reentrant code is detected by IEUF8M, 

and the associated error routine sets 
CTRENT(ACT) to FFj¢. The switch is in- 
vestigated by Phase FPP, and, if the setting 
FFig¢ has occurred, the appropriate error 
message is logged. No message for possible 
reentrant error occurs in line. 


CCWB 


The CCWB routine processes the operand field 
of CCW statements. A complete syntax and 
semantic check is made. The instruction 
building area is formatted for output. 


Through the IEUF8D routine, relocation 
dictionary entries are made for the second 
operand of CCW statement. 

CNOPB 

This routine places as many BCR instructions 
as necessary in the instruction stream. 

EQUB 

The equivalance routine puts the equated 
value into the address location for printed 
output. 

ORGB 

The ORGB routine returns control to mainline 


control. Processing is done in Phase F7. 


ENDB 





The ENDB routine does a syntax check and sets 
the end switch ENDSWH(ACT) for the Post 
Processor to put out the correct end card. 

It also formats the printout of the end 
record. 


LTORGB 


This routine tests to see if literals are 
to be put out. If they are, the literal 
adjustment table is input, and the location 
field is set to the address of the first 
literal to be output. 


USINGB 


This routine does a complete syntax and 
semantic check on the operand of a uSing 
statement. A using table pointer is set to 
_FFi¢ for each register being used, and the 
correct value and the external symbol dic- 
tionary ID is set in the corresponding 
Using table entry. 


DROPB 


This routine does a complete syntax and 
semantic scan on the operand field of a DROP 
statement. The Using table pointer is set 
to 0 for each register dropped. 


LITERB, DSB, DCB, DXD, CXD 


Switches are set for proper branching with- 
in the IEUF8D routine, and control is 
passed to IEUF8D. 


IEUF8P - OUTPUT ROUTINE (FLOWCHARTS 32-33) 


At entry, the current text record at 
FS8WORK(ACT) is moved into INPUT work area. 
If this record is one of the edited types, 
a partially formatted left side at F8INST 
(ACT) is moved into LFTHLF work area. 

IEUF8P has four entry points: IEUFSP, 
BLDIMG, COMMENT, and LOADRA. Text records 
are passed to IEUF8P as they are encountered 
in the text stream. 


@ IEUF8P processes edited text records 
(type 100). 


@ BLDIMG builds a source image from gen- 
erated edited records (types 110 or 111). 


@® COMMENT loads 
records (type 
an error line 
and saves source records 
in effect). 

@ LOADRA prints an error line if the last 
record is an error record (type OO1). 


the right side for source 
000, 010, or O11), puts 


(if TERM option 


As an example, if the PRINT ON, DATA, 
and GEN options have been requested, the 
following action is taken (as applicable): 


records) - The 
line buffer is 
buffer is dumped. 


@® IEUF8P entry (type 100 
left side of the print 
loaded, and the entire 


@® BLDIMG entry (type 110 or 111 records) - 
A source image is constructed and treated 
like a source record (type 010 or O11), 
which is then processed like an edited 
record (type 100). 


@ COMMENT entry (type 000, 010, or O1l 
records) - The previous right side of 
the print line buffer is printed (if 
still loaded), and the information is 
put in the punch buffer. The right side 
of the print buffer is loaded with the 
current record. 


@ COMMENT entry (type 001 record) - An 
error line is printed if the error indi- 
cator is on. 


@ LOADRA entry (type 001 record) - The 
error record is reformatted to include 
the statement number, and an error indi- 
cator is turned on. 


IEUF8P has the following functions 
(acronyms within parantheses refer to flow- 
chart terms): 


@e Format left side (LOADLH) and right side 
(LOADRH) of print line and print entire 
line (CHKSWH). 


e Format text output cards (GOTXT) and 
punch them (DUMP). : 
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for error records (type 001), 


e Build source image from generated edited PAGE - "PAGE". 
records (BLDIMG). | 
| PCNT - Page number. 
e Put title in page heading and put page 


heading for each new page (PGEHED) . H2 Col. headings for printed listing. 
e Reformat error record to include the Print Line Buffer (Figure 16) 
statement number (WTERR) and print error 
line (LOADRERR) . LOC - Address of instruction relative 


to start of program. 
e Space when SPACE is encountered and 


eject to a new page for EJECT and TITLE. OP - Hex op code. 
® Format and print MNOTE message. RIR2 - Registers specification. 
@® Punch REPRO and PUNCH cards (SYSO). OPN1 - 2nd instruction byte. 
IEUF8P formats are given in Figure 16. OPN2 - 3rd instruction byte. 
Print Heading Buffer (Figure 16) EAl - Relative address of operand l. 


EFA2 - Relative address of operand 2. 
Hl DECKNM - Deck identification. 
DSTMNT - Statement number. 
HEADNG - Programmer heading from TITLE 
statement. SOURCE - Source statement. 


Print Heading Buffers (121 bytes each) 


fp od sc HEADING [ae PAGE i PCNT 


a No. 0 116 117 


H2 102! |Locl lossect] Icopel | appril | Appr2 STMT SOURCE| ISTATEMENT! IF 14FEB66 DATE 
BRE NOt Gf SG ~~ CA SA es 2829 34 «36 40 43 49 50 59 103 113 121 


Print Line Buffer (121 bytes) 





Byte No. 12 17 | 34 36 40 41 21 


Dummy Buffer (121 bytes) - PRINT buffer for error line, alignments, MNOTE message; punch buffer for PUNCH/REPRD 


omofo] 


Byte No. 0 1 171 


PUNCH Buffer (80 = - for TXT cards 
Byte No. 8 


Figure ra erees ae 
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Input Buffers 
(1) Left side (20 bytes) 


oe RIB. | FLAGBXESDID[ LoccTR | QB, PRRRT | RXB2D2 SSB2D2 
0 2 3 4 7 8 9 1 i316 19S 


Byte No. 


FLAG} INDICATORS | BYTE COUNT 


Indicator Settings 
1111 DS statement 
1000 Align. data 
0100 DC statement 
0010 EA] present 
0001 EA2 present 
OOXX Syllable count 

00 1 - 2 bytes 
- \ 2-4 bytes 
1 3 - 6 bytes 


(2) Unpack area for left side (32 bytes) 


OP : 
cera [cope | reer | axe202_ | sse202 
6 8 10 4 2 (5 





WORK 
Byte No. 0 





(3) Right side (400 bytes) 


INPUT | RLIA |FLAGA CARD | 


Byte No. rol 9 3 A400 


Output Buffer Error Record (38 bytes) - Output from Phase F8 


2 3 4 b 5 16 38 





ERREC | 
Byte No. 0 


SYSTERM Buffer - optional 


Byte No. 0 1 3 89 519 557 


6 source records 


e®Figure 16. IEUF8P Formats (Cont'd) 
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Punch Buffer for TXT Cards (Figure 16) 
TXT —- "TXT" 


ADDR - Relative address of lst instruc-— 
tion on card. 


BYTCNT - Number of bytes of information 
on card. 


ESDIDX - External symbol ere cTonery 
- number. 


INS - 56 bytes of information. 
IDRH - Deck identification. 


SEQ - Card sequence number. 


Input Buffer/Output Buffer (Figure 16) 


| RLIB (RLIA/ERLI/TRLI) 
indicator. 


- Record length 


FLAGB (FLAGA/EFLAG) - Record type. 


XESDID - External symbol dictionary 
number. 


LOCCTR — Relative address of instruc- 
tion. 


OPCODE — Hex op code. 
RRR1 - Registers specification. 
RXB2D2 - 2nd instruction byte. 
SSB2D2 - 3rd instruction byte. 
EA1l - Relative addresses of operand. 
EA2 - Relative addresses of operand. 
FLAG - 
CARD - Source statement. 
NERR - Number of errors in statement. 
ESTMNT - Statement number. 
ERRL - ERR16 - 1-16 error codes and 
pointers. 
IEUF8D —- DC EVALUATION (FLOWCHARTS 34-35) 
Phase F8 mainline control calls IEUF8D each 
time a DC, DS, literal DC, or CXD is en- 


countered. The low order byte of register 
13, at entry, is set as follows: 00 = DS, 
FFi¢ = DC, mixed = literal DC. 

IEUF8D processes an entire DC statement 
each pass. The print routine, IEUF8P, is 
called as many times as necessary. There 
is one DC work bucket (15 bytes) in the 
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appended fixed field for each operand ina 
statement, and each operand may contain one 
Or more constants. See Figure ll. Excep- 
tions are character, hexadecimal, and binary 
type DCs which may contain only one con- 
stant per operand. 

Relocation dictionary entries are made 
for A-, Y-, V-, and Q-type relocatable con- 
stants which meet minimum length specifica- 
tions. However, no relocation dictionary 
entries are made for address constants with- 
in a dummy section or common, nor for ad- 
dress constants whose operand address is 
within a dummy section. One relocation dic- 
tionary entry is made for each CXD instruc- 
tion providing that the CXD is not ina 
dummy section or common. 

Upon completion of a statement, IEUF8D 
returns to IEUF8C by executing a branch to 
location CTRTRN in the central control 
table. 


ITEUF8N - PHASE F8 FLOATING AND FIXED-POINT 
CONVERSION (FLOWCHART 36) 


This routine does all floating - and fixed- 
point conversion in declarative (DC) state- 
ments. It is called by the Phase F8 DC 
evaluation routine (IEUF8D) once for each 
constant in a floating-point or fixed-point 
DC operand. At entry, Register No. 1 points 
to the first byte of the constant to be 


- converted (the first byte past the left 


delimiter), and Register No. 10 points to 

the corresponding DC work bucket in the 

edited text record. The DC work bucket 

contains the DC type, length modifier, 

scale factor, and external exponent modifier. 
After the conversion has been completed, 

program control is returned to IEUF8D eva- 

luation with three pointers: Register No. l 

points to the right delimiter, Register 

No. 2 points to the converted value of the 

constant (16 bytes), and Register No. 13 

points to an error flag. If Register No. 

13 is zero, no error has occurred. 


ITEUF8V - EXPRESSION EVALUATION SUBROUTINE 


This subroutine is the same as IEUF7V with 
the exception of XREF, but the two are 
loaded separately in their respective 
phases. 


IEUF8L - LOG ERROR SUBROUTINE 


This subroutine is the same as IEUF7L, but 
the two are loaded separately in their 
respective phases. | 


IEUF8S - SYMBOL TABLE SUBROUTINE 


This subroutine has one entry point, STGETR. 
This tests whether the requested symbol is 
in the table and, if so, gives the address 
of the first byte in the entry after the 
name field. If not, zero is returned. 


OVERALL OPERATION (FLOWCHARTS 37 AND 38) 


The Post Processor Phase, Phase FPP, is 
divided into two control sections which 
are executed serially. 

The first section, IEUFPP, reads the RLD 
and cross-reference records from the over- 
flow file (SYSUT3), sorts them, writes RLD 
on SYSPUNCH and/or SYSGO and SYSPRINT and 
the XREF records on SYSPRNT. (If the DOS 
assembler option is specified, the RLD 
records will not be sorted. See Appendix 
A.) FPP also writes the END object card on 
SYSPUNCH and/or SYSGO after the RLD. See 
Figure 17. In the event there are too many 
relocation dictionary/cross-reference 
record entries to be held in main storage 
at one time, SYSUT1 and SYSUT2 are used for 
sorting. 

The second section, IEUFD, reads error 
records* from the overflow file (SYSUT3) and 
formats an error message by matching a code 
in the error record against a message table 
in main storage. IEUFD also prints the sta- 
tistical information (statements flagged, 
highest severity code, and line count) and 
returns to. the invoker through RTA and 
IEUASM. 


ITEUFPP FUNCTIONS (FLOWCHART 37) 


The IEUFPP functions are designed to pro- 
duce the relocation dictionary and the 
cross-reference list, if requested. 
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Dictionary 


foe 
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Errors 
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Relocation Dictionary Phase 
Statements flagged FPP 
SORT SORT 
UTILITY UTILITY 
Adjustment 
Table 


Main = 
Storage 
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IEUFPP sorts the relocation dictionary 
entries by address. The sorted dictionary 
is written onto SYSPRINT and SYSPUNCH and/or 
SYSGO. The loader END record is constructed 
and written onto SYSPUNCH. 

If the EXEC statement did not specify 
NOXREF, IEUFPP sorts the cross-reference 
table entries by symbol. The sorted table 
is written on SYSPRINT. 

IEUFPP transfers control to Section 
IEUFD by branching. 


ITEUFPP SUBROUTINES 

CHKSWH - Jump Table Sort 

FPP - Phase Initialization (IEUFPP) 
EPRLZ — Merge Tape Writer 

EP2 -—- Merge Tape Writer 


ESORT - Input Data Sorter 


GTOR - Control Table Reader 


GTOX - Cross Reference List Checker 
This routine checks for the cross-reference 
list output option. 


PPIN - Phase PP Initialization 


RDIRLD - Relocation Dictionary Record 


Merger 


RDIXRF - Cross-Reference Record Merger 


READR - Relocation Dictionary Reader 

This routine reads the relocation dictionary 
records from input tape and stores them. 
READX - Cross-Reference Reader 


This routine reads cross-reference records 
from input tape and stores them. 


eFigure 17. I/O Flow for Phase FPP SETOT1 - Relocation Dictionary Writer 


* together with the flagged statements if 
the TERM option is in effect. It then also 
produces the diagnostic information on 
SYSTERM. 


This routine writes all relocation dic- 
tionary data from main storage on SYSPRINT, 
SYSPUNCH, and/or SYSGO. 
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SETOT2 - Cross Reference Writer 


This routine writes all cross-reference 
data from main storage. 


WRLRLD ~ Relocation Dictionary Writer 


This routine writes the relocation diction- 
ary string on SYSUT1 (or SYSUT2) for sort- 
ing. 


WRIXRF - Cross-Reference Writer 


This routine writes cross-reference on 
SYSUT1L (or SYSUT2) for sorting. 


XRFLOD - Cross-Reference Starter 


This routine starts the cross-reference 
input pass. 


IEUFD FUNCTIONS (FLOWCHARTS 38) 


The Phase FPP diagnostic, IEUFD, reads the 
error records from the overflow file 
(SYSUT3). Table lookup of error numbers 
is performed to find the corresponding 
error message. The statement number and 
message number are converted to printable 
format and listed with the error message on 
SYSPRINT and SYSTERM. 

The functions of this phase are as 
follows: 


e Write source records (on SYSTERM). 


@® Write diagnostic messages (on SYSTERM and 


SYSPRINT}) 


@ Accumulate and print the total number of 
error messages in the entire assembly 
(on SYSTERM and SYSPRINT). 


@ Process and print the highest severity 
code (on SYSTERM and SYSPRINT). 


@e Print statistics and options in effect 
(on SYSPRINT). 


e Print the line count (on SYSPRINT). 


If the TERM option is in effect, the 
SYSTERM data set is opened (this data set 
is used at the PUT level). Before printing 
any error:messages, a check is made to 


determine if any relocatable Y-type constants 


have been used in the program. If any have 
been used, message 46 prints as a flag to 
the programmer. The limited addressing 
capability of the Y-type constant, due to 
being only two bytes long, could present 
problems if the program is run on a system 
with over 65,536 bytes of storage. 
Following the flagging of Y-type con- 
stants, a check is made to determine if 
there are any error records to be flagged; 
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if not, the word 'NO' is inserted into the 
"STATEMENTS FLAGGED. . ." message, this 
message is printed, the number of printed 
lines in the listing is printed, and the 
phase exits to IEURTA. If there are error 
records to be flagged, each error statement 
number is listed with an appropriate mes- 
sage identifying the error. A total of the 
number of statements flagged is accumulated 
and printed. As each error message is 
processed, its severity code is checked. 
The highest severity code encountered is 
saved in register 15 and printed. The phase 
exits to IEURTA after printing the line 
count. 


ITEUFD SUBROUTINES 


FD 

FD locates the error block count, tests the 
Y-type constant indicator, and if necessary, 
points to message 46 in preparation for 
printing the "AT LEAST ONE RELOCATABLE Y- 
TYPE CONSTANT. . ." message. If there are 
no relocatable Y-type constants in the pro- 
gram, it branches to MLOO. 


| RDERR - Error Record Reader 


HCC - Severity Code Storage 


This routine stores, in register 15, the 
highest severity code encountered. 


MLOO - Error Record Tester 


This routine tests if there are any error 
records to be processed. If there are no 
error records to be flagged, the "NO 
STATEMENTS FLAGGED. . ." message is built, 
then a branch to ML11 occurs to list the 
message. If there are error records to 
be listed, this routine exits to MLOIA. 


MLO1L - Error Record Getter 
This routine gets the next error record. If 
the last error record has been read, a 
branch occurs to MLILO. 

MLOIA - Error Statement Getter 

This routine gets the error statement num- 
ber and accumulates an error statement 
total. 

MLO1LB - Error Statement Converter 

This routine converts the error statement 


number into decimal for listing and points 
to the appropriate error message. 


MLO3 - Error Message Converter 


This routine converts the error message for 
listing and lists it. 


MLO5 - Error Statement Comparer 


This routine compares the error statement 
severity code to the highest severity code 
yet encountered. It saves the new severity 
code if it is higher than any previously 
encountered. 


ML1O - Statement Printer 


This routine prints the total number of 
statements flagged. 


ML11 - Error Message Lister 


TRMXRTIN - SYSTERM DCB Exit Routine 
TREDIT - SYSTERM Source Statement Editor 


If the TERM option is in effect this routine 
arranges SYSTERM output depending on 
STMT/NOSTMT and NUM/NONUM options. 


SYSTRMD - SYSTERM Output Lister 
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PHASE ERR - PERMANENT I/O ERROR ABORT 


The I/O error abort phase, Phase ERR, 
obtains information about a permanent I/O 
error and then terminates the assembly. It 
consists of one control section -- IEUERR -- 
which receives control (via XCTL) from the 
phase in which the error occurs. That 

phase frees the core it originally obtained 
and waits for completion of other outstand- 
ing I/O requests before passing control to 
LEUERR. 
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IEUERR issues a SYNADAF macro instruc- 
tion to get the following detailed infor- 


mation about the error -- jobname, stepname, 


unit address, device type, ddname, opera- 
tion attempted, and error description. 
This information is output to either the 
console device or SYSPRINT, or when the 
TERM option is specified, SYSTERM. 

IEUERR returns to either MAC or RTA with 
a Return Code of 20. Figure 3 shows the 
control flow to and from Phase ERR. 
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Chart 22. IEUF7E - Phase F7 ESD Routine (2 of 3) 
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OPTIONS 


The programmer may specify the options 
listed in Figure 17 in the PARM= field of 
the EXEC statement. The options that are 
underlined in the figure are the default 
values that are assumed by the assembler if 
no value is specified in the EXEC card. 


The options are defined as follows: 


DECK -- The object module is placed on the 
device specified in the SYSPUNCH DD 
statement. 

LOAD -- The object module is placed on the 
device specified in the SYSGO DD state- 
ment. | 


Specification of the parameter LOAD causes 
object output to be written on a data set 
with ddname SYSGO. This action occurs in- 
dependently of the output on SYSPUNCH 
caused by the parameter DECK. The output 
on SYSGO and SYSPUNCH is identical except 
that SYSPUNCH is closed with a disposition 
of LEAVE, and SYSGO is closed with a dis- 
position of REREAD. 


LIST -- An assembler listing is produced. 


TEST -- The object module (if produced) 
tains the special source symbol table 
required by the test translator 
routines. 


con 


XREF -- The assembler produces a cross- 
reference table of symbols as part of 
the listing. 


RENT -- The assembler checks to see if the 
user's code is reentrant. 


The prefix NO is used with the above 
options to indicate that the option is not 
wanted. 


NOALGN -- The assembler supresses the 
diagnostic message IEU033 ALIGNMENT ERROR 
if fixed point, floating point, or 
logical data referenced by an- instruction 
operand is not aligned on the proper 
boundary. The message will be produced, 
however, for references to instructions 
(e.g., by a branch) which are not 
aligned on the proper (halfword) 
boundary. 


LINECNT= 


PARM= 


{ DECK LOAD LIST TEST XREF 
NODECK, NOLOAD, NOLIST,NOTEST,NOXREF, 


Figure 18. Assembler Options 


(TESTRAN) 


Note 1: 


nn, NUM STMT), 
55,NOALGN, DOS, NORENT ,NOTERM,NONUM, NOSTMT 


Page of GY26-3700-2 
Revised January 15, 1972 
By TNL GN33-8127 


APPENDIX A. ASSEMBLER OPTIONS 


ALGN -- The assembler does not supress the 
alignment error diagnostic message. 


OS -- The assembler will have complete 
Operating System Assembler F capability. 


DOS -- The assembler will behave like Disk 
Operating System (DOS) Assemblers D and 
F. Anything defined in either of these 
assemblers with the exception of &SYSPARM 
will be accepted. CXD, DXD and OPSYN 
will be treated as undefined Q-type DC 
and DS statements and RLDs will appear 
in the Relocation Dictionary in order of 
their occurence (unsorted). DOS is 
incompatible with LOAD, TEST, and NOALGN. 
If any of these options are specified 


with DOS, the assembler generates a 
diagnostic message and uses NOLOAD, 
NOTEST, and ALGN. 


If contradictory options are entered, 
e.g., LIST, NOLIST, the rightmost option, 
NOLIST, is used. 


LINECNT=nn -- This parameter specifies the 
number of lines to be printed between 
headings in the listing. The permissible 
range is 01 to 99 lines. 


TERM -- The assembler writes diagnostic 
information on the SYSTERM data set. 
Options NUM and STMT can be specified 
only if TERM is used. 


NUM -- The line number field (columns 73-80) 
is written on SYSTERM for statements 
for which diagnostic information is 
written on SYSTERM. This option is valid 
only in connection with TERM. 


STMT -- Statement number will be written on 
SYSTERM for statements that are flagged 
by the assembler. STMT is valid only in 
connection with TERM. | 


If option NUM or STMT is used 
together with NOTERM a diagnostic message 
(IEU078) will be generated. 


Note 2: If option NOTERM is used for an 
assembly, NONUM and NOSTMT will not be 
listed after *OPTIONS IN EFFECT* in the 
diagnostic section of the listing. 


Note 3: If option TERM is used, options 
NUM and STMT are taken as default values. 


ALGN OS RENT TERM 
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APPENDIX Be CONTROL PROGRAM SERVICES 


GENERAL 


The control program services (macros) 
utilized during operation by the assembler 
are described briefly in this appendix. 
Detailed information is given in the 


Os Supervisor Services and Macro 


Instructions and OS Data Management 
Macro Instructions publications. 


DCB 


This macro interfaces with the control pro- 
gram. Information required to process a 
data set is presented by the assembler in 
this instruction. 


GET 


This macro is used to read SYSIN. 


PUT 


This macro is used to write SYSPRINT, 
SYSPUNCH, and SYSGO. 


READ 


This macro is used to read SYSLIB, SYSUTI, 
SYSUT2, and SYSUT3. READ retrieves the re- 
quested block from the input data set and 
places it in a main storage area. 


WRITE 


This macro is used to write SYSUTI1, SYSUT2, 
and SYSUT3. Write transfers a block from 
the user's main storage area to a physical- 
ly sequential data set. 


CHECK 


This macro checks the validity of READ or 
WRITE. It waits, if necessary, for the 
completion of a read or write operation 
and detects errors and exceptional con- 
ditions. 


NOTE 


This macro records the position of an ele- 
ment in a data set by requesting the re- 
lative position within a volume of the 
block just read or written. This allows 
the direct retrieval of the block at a 
later time. | 
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POINT 


This macro positions a data set for a READ 
(POINTR) or a WRITE (POINTW) from a NOTEd 
location. POINT alters the sequential proc- 
essing of a data set such that the next 

READ or WRITE operation will take place at 

a previously NOTEd position. 


GETMAIN 


This macro acquires main storage for internal 
tables, buffers, etc., by requesting the 
supervisor to allocate one or more areas of 
Main storage for assembler use. 


FREEMAIN 


This macro releases one or more areas of 
Main storage previously acquired through 
one or more GETMAIN macro instructions. 


FIND 


This macro locates a partitioned data set, 
member by placing the address of its first 
block in the indicated data control block. 


OPEN 


This macro is used to initialize one or 
more data control blocks so that their asso- 
Ciated data sets can be processed. 


CLOSE 


This macro disconnects one or more data sets 
from a program by closing one or more data 
control blocks. 
CLOSE (TYPE T = TCLOSE) 

This form of the CLOSE macro instruction 
can be used to temporarily disconnect one 
or more data sets from a program. After 
repositioning to a starting point, as spec- 
ified in the macro, the data set may be 
processed again. 


LINK 


This macro is used to link to a program 
segment. LINK passes control from one load 
module to a specified entry point in another 
load module, keeping both modules resident 
in main storage. 


XCTL RETURN 


This macro transfers control from one load This macro returns control from a LINKed 
module to another. The main storage area program segment. It indicates normal ter- 
occupied by the module issuing the XCTL in- mination of a task and returns control to a 
struction is freed for other uses. higher level program or task, or to the con- 


trol program. 
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APPENDIX C. SYSTEM OVERHEAD 


System Overhead consists of those features 


in the control program which the assembler 
uses once regardless of source program 
size. Included in this estimate are the 


following: 


Function 


2 separate OPEN 


2 separate CLOSE 


3 separate LINK (.4 sec. 
each) 
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Estimated Time 


(secs.) 


5.76 + 20% 
2.25 + 20% 


1.20 + 20% 


Function 


6 separate XCTL (.4 sec. 
each) 


6 separate FIND (.3 sec, 
each) 


6 separate TCLOSE (.2 sec, 
each) 


Scheduler Time 


System Overhead 


Maximum System Overhead 


Estimated Time 


(secs -) 


2.40 + 20% 
1.80 + 20% 
1.20 + 20% 


10.00 + 20% 
24.61 


29.3353 


APPENDIX D. INTERNAL ASSEMBLER INSTRUCTION CODES 


Mnemonic Hexadecimal 
Value 


GBLA 
GBLB 
GBLC 
LCLA 
LCLB 
LCLC 
SETA 
SETB 
SETC 
AIF 

AGO 

ANOP 
COPY 


WONIDUBWNHE OO 
AWDPRPOoOMANIANAUBWNHEO 


MACRO 
MNOTE 
MEXIT 
MEND 


ICTL 

ISEQ 

PRINT 
SPACE 
EJECT 
PUNCH 
REPRO 
TITLE 


ENTRY 
EXTRN 
START 
CSECT 
DSECT 
COM 


EQU 
ORG 
END 
LTORG 


USING 
DROP 
Literal DC 
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APPENDIX E. TRANSLATE TABLE 


All characters in source statements are 
translated to an internal hexadecimal 
coding. Translation is done to facilitate 
comparisons and some arithmetic operations 
and to obtain a degree of character set 
independence. . 

The internal language is translated 
back to external code before output. Bit 
configurations not representing Operating 
System/360 Assembler Language characters, 
e.g., valid overpunch characters in fields 
PUNCHed or REPROed, are not affected by the 


Table 12. Translate Table 


Standard Machine Internal 
Graphic Hexadecimal 
Symbol Code 


Standard Machine Internal 
Graphic Hexadecimal 
Symbol Code 


+ @® ® FN < x =< c7A4 FO 


2 
3 
4 
5 
6 
7 
8 
e 
A 
B 
Cc 
D 
E 
F 
G 
H 


7 OZTZzrAL 
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translation. (They are translated into 
themselves.) See Table 12. 

Application of the translate table also 
allows the user to assemble programs written 
in other than System/360 Operating System 
Assembler Language by providing a different 
translate table for the conversion. 

The collating sequence of the internal 
language differs from the standard collating 
sequence. In the standard collating sequence, 
numeric values are higher than alphabetic or 
special characters. 


PHASE F3 SWITCHES 


MISWILT 
Bit No, 


0 
1 


SWITCH 


Bit No. 


2 


NESTSW 


Bit No. 


6 


Xx'20! 


xX'10' 


x'O8! 


X'O04' 


X'O2' 


X'OL' 


Hex. Sw. 


x'20' 


X'08! 


X'OL' 


Hex. Sw. 


x'O2' 


EP HF © HO 


Not 


© 
I 


H OF 


used 

Do another pass on 
macro instruction 
operands 

2nd pass completed 
on macro instruction 
operands 

Macro instruction 
being processed 
Entry is a sublist 
Entry to be made 
from prototype 

Entry to be made 
from macro instruc- 
tion 

Nest aborted; no 
room to store 
parameter pointers 
Macro aborted during 
build of parameter 
table 

Max. record exceeded 
(used by WRITE rou- 
tine) 


NOTE in IOMAC Routine 
No need to NOTE in 
IOMAC routine 

Use PNTR in IOMAC 
routine 

Use PNTW in IOMAC 
routine 

End of Expr. 1 or 
Expr. 2 of sub- 
string has been 
reached 


Set when a new block 
has been read when 
processing a macro 
instruction. 


SUBSW 





Bit No. 


6 


MODESW 


Bit No. 


0) 


NOW 


Hex. 
x'O2' 


X'OL' 


x'O1' 


Hex. Sw. 


x'80' 


Xx'40' 


Xx'20' 


x'10' 


x'08' 


X'Q4' 


Xx'OL' 


Sw. 


/ 


‘oo 
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APPENDIX F, 


SWITCHES 


Macro instruction 
mode -— set when a 
macro instruction 
is encountered so 
that nesting may be 
recognized. 


Set when MODESW has 
been saved. Char. 

Or arith. mode must 
be saved when a sub- 
scripted left paren- 
theses is encountered 
so that this mode may 
be restored after the 
subscript dimension 
is computed. 

This must always be 
initialized to the 
value of l, used 
when original MODESW 
is restored. 


SYSLIST to provide 
alternate to symbolic 
parameters 

2 expressions in 
SYSLIST 
Concatenation has 
occurred in string 
area 

Error switch in sub- 
string routine - 
signal to use null 
string later on 
First time switch - 
set after first char. 
string has been 
placed in string 
area 

Substring mode 
available for use 
arithmetic expr. 
mode 

character expr. 

mode 
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PHASE F7., FI, F8 AND FPP SWITCHES 


CTLOC Current Location Counter CTPGLNCT Page Line Count 
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CTSEQN Current Statement Sequence Number CTMRSRTN MRS Return 

CTLEN Current Statement Length CTZERO Two Full Words of Zeroes 
CTITLE First Title Name, Opnd.Len, Opnd. Ptr. CTWORK 256 Byte Work Area 

STVALU Value For STPUT Entries CTONWP Next Write Pointer On OVF 1 
CPRIME Prime Divisor For Symbol Table CTRXF First XRF Block PTR On OVF1 
CSTVAL Value From START card CTRLBT First LBT Block PTR On OVF1 
CTXLEN Text Block Length CTRERR First Error Block (PH8) 
CNOESD Number of ESDs CTCXRF XRF Block Count 

CENTCT Number of Entries CTCLBT LBT Block Count 

CLASID Last ID 3 CTCRLB RLD Block Count 

CTNDID Next DSECT ID CTCERR Error Block Count (PH8) 
CESDNO Current ESD Number CTCLAT LAT Block Count On OVF2 
CSGCTR ESD Resident Segment Counter CTLALN LAT Length Indicator 

CPCNO Private Code ESD Number CTLITA Current Literal Pool String Lengths 
CCMNO -Common ESD Number CTLITB Current Literal Pool String Counts 
STLONG Length Attribute For STPUT Entries CTXSAV 

ESSGSZ ESD Segment Size CTFSTN ESD No. of First CSECT 
CESDID Current ESD ID CTDATE Date For Listing 

CTPCSW Private Code Switch CTLINECT Print-Line Count 

CTCMSW Common Switch CADJTB Adjustment Table Base 

che Sd ae RR2SWH RR2 Instruction Type Switch 
CTYPE Current CSECT Type : 

CTLIT2 LTORG Or END Card Switch ERSWH ERROR owiten 

ESDID Assigned ESD ID SPACSW SPACE Switch 

ADJCOD Adjective Code EJCTSW EJECT Switch 

CTALIN Alignment Code 0-B, 1-H, 3-F,7-D REPSW REPRO Switch 

CTITSW Iteration Switch CCRDCT Card Count 

CTPDS1 Defined Symbols Req. For IEUF7V CTLATL Literal Adj. Tab.- Last Byte + 1 
CTCLSI First Pass Indicator ENDSWH END Switch 

CTLITI Literal Pool Complete During Subst. FBO PRN Operand Pointer 

CTERRI Error Record Indicator CTLATB 

CTPH7C Phase F7 Complete Indicator F8CADJ Current Adjustment 

CTSYMF Symbol Table Full Indicator ALIGN4 For Aligning 

CTPCHI Punch Option Indicator F8ALLB Full Word Of Bits 

CTCGOI CGO Option Indicator F83BYT 3 Bytes Of Bits, Low Order 
CTITLI First Title Processed Indicator F82BYT 2 Bytes Of Bits, Low Order 
CTLSTI List Option Indicator F81BYT 1 Byte Of Bits, Low Order 
CTGENI List Gen.Option Indicator F8PON Print Option ON-OFF Switch 
CTERLI List Error Option Indicator F8P GEN Print Option GEN-NOGEN Switch 
CTXRFI X~-Ref. Option Indicator F8PDAT Print Option DATA-NODATA Switch 
CTTSTI TESTRAN Option Indicator F8ZERO One Full Word Of Zero 
CTTRMI TERM Option Indicator 

CTSTMI STMT Option Indicator 

CTNUMI NUM Option Indicator 

CTSDVI Self Defining Value Indicator F8INST 16 Byte Instruction Bldg. Area 
CTLCRI Location Counter Reference Indicator F8ZRO One Full Word Of Zero 
CTMODE Mode Indicator PYRSW 

CBDNO Blank DSECT ESD No F8YDC 

CBDSW Blank DSECT ID No CTESRN ESD Seg. Count 





The terms in this glossary are defined 
relative to their use in this publication 
only. These definitions may differ from 
those in other publications. 


Assemble: To prepare an object language 
program from a symbolic language pro- 
gram by substituting machine operation 
codes for symbolic operation codes and 
absolute or relocatable addresses for 
symbolic addresses. 


Assembler Operation Code: A hexadecimal 
one-byte code assigned to all assembler 
instructions by programming systems 
for internal use. 


Attributes: Characteristics of certain 
elements in statements processed by the 
assembler. There are six attributes: 
type, length, scaling, integer, count, 
and number. The macro generator proces- 
ses all of them; the assembler portion, 
only the length attribute. 


Basic Partitioned Access Method (BPAM): A 
method of storing and retrieving se- 
quences of data "members" belonging to 
a data set stored on a direct access 
device. The data set contains a | 
directory that relates the member name 
with the address where the sequence 
starts. 


Basic Sequential Access Method (BSAM): A 
method of storing and retrieving physical 
blocks of data from a sequentially 
organized data set. 


Concatentation: The process of linking to- 
gether, or chaining, or joining. 


Conditional Assembly: The selective as- 
sembly of those source language state- 
ments that satisfy predetermined con- 
ditions, e.g., tests of values that may 
be defined, set, or changed during the 
course of the assembly procedure. The 
conditional assembly precedes the regular 
assembly procedure. Conditional assembly > 
allows a programmer to specify assembler 
language statements which may or may not 
be assembled depending on conditions eval- 
uated at assembly time. 


Control Program: A collective term for the 
Operation and resource controlling rou- 
tines of the operating system. 


Control Section: The smallest separately 
relocatable program unit, always loaded 
into a contiguous main storage area. A 
control section is an entity. Its name, 
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if there is one, is defined by a CSECT 
or START statement. 


Data Control Block (DCB): A region in 
Storage used for communication between 
the source program, the control program, 
and the access routines. A control 
block containing information for access 


routines pertinent to data storage and 
retrieval. 


Data Set: A named collection of data. 


Device Independence: The ability to request 
input/output operations without regard 
to the characteristics of the input/ 
output devices. 


Direct Access: Retrieval or storage of data 
by a reference to its location on a vol- 
ume, rather than relative to the prev- 
iously retrieved or stored data. 


External Symbol Dictionary: Part of an 
object or load module that identifies 
external names (control sections, ENTRY 
statements, common areas, and private 
codes) and external references (EXTRN 
statements and V-type address constants) 
occurring in the module. 


External Symbol Dictionary Identifier (ESD- 
ID): A one-byte number identifying a 
control section or other external symbol 
dictionary entry. 


Global Dictionary: A core storage resident 
table containing machine and assembler 
operation codes, macro mnemonics, and 
global variable symbols. 


Global Variable Symbols: Global SET sym- 
bols (the only type of global variables) 
that communicate values between state- 
ments in one or more macro definitions 
and statements outside macro definitions. 


Hashing: Generating an address between two 
limits by randomization. 


Hash Table: A table, accessed through 
generated numbers (i.e., randomization), 
pointing to entries in a dictionary or 
table. | 


A macro instruc- 
a model statement in a macro 


Inner Macro Instruction: 
tion used as 
definition. 


Linkage Editor: A program that produces a 
load module from object and/or load 
modules. The output load module is in 
a format suitable for loading and 
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execution under the control of the 
control program of the operating 
system. 


Literal: A representation of a constant 
which is entered into a program by 
specifying the constant in the operand 
of the instruction in which it is used. 
The assembler stores the value specified 
by the literal in a literal pool, and 
places the address of the storage field 
containing the value in the operand 
field of the assembled source statement. 


Literal Pool: A portion of the object pro- 
gram containing literals processed by 
the assembler. 


Load Module: A relocatable and executable 
logical unit of coding. It is the out- 
put of the linkage editor in a format 
Suitable for loading into main storage. 


Local Dictionary: A table containing 
sequence symbols, ordinary symbols, 
local SET symbols, and macro instruc- 
tion parameters. 


Local Variable Symbols: Symbols that 
communicate values between statements in 
the same macro definition, or between 
statements outside macro definitions. 

The following are local variable symbols: 


1. Symbolic parameters 
2. Local SET symbols 
3. System variable symbols 


Logical Record: A record from the stand- 
point of its content, function, and use 
rather than its physical attributes; i.e., 
one that is defined in terms of the 
information it contains (contrasted with 
Physical Record). 


Macro Definition: A set of statements that 
provides the assembler with the mnemonic 
Operation code and the format of the 
macro instruction, and the sequence of 
statements the assembler generates when 
the macro instruction appears in the 
source program. 


Macro Instruction: A source program state- 
ment for which the assembler generates 
a sequence of assembler language state- 
ments. Three types of macro instruc- 
tions may be written: 


1. Positional - operands in fixed order. 
2. Keyword - operands in variable order. 
Se 


Mixed-mode - combination of above. 
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Macro Instruction Prototype: The second 
statement of every macro definition; it 
specifies the mnemonic operation code and 
the format of all macro instructions that 
refer to the macro definition. 


Main Storage: All addressable storage from 
which instructions can be executed or 
from which data can be loaded directly 
into registers. 


Model Statements: The macro definition 
statements from which the desired se- 
quences of assembler language statements 
are generated. 


Module: A logical unit of coding that per- 
forms a function or several related 
functions. 

A source module is a set of source 
language statements prepared for input 
to a language translator. 

An object module is the output of a 
language translator, (e.g., assembler). 
It is a machine language program in re- 
locatable format. A load module is the 
output of the linkage editor. It is in 
relocatable and executable format. 

A module is composed of one or more 
sections (see Control Section). 


Object Program: A machine language pro- 
gram which is the output after trans- 
lation from the source program. 


Operating System (IBM System/360 Operating 
System): A complex of processing pro- 
grams operating under the supervision 
of the control program. The processing 
programs include language translators 
(e.g., the assembler), service programs 
(e.g., utilities), and problem programs. 
The operating system facilitates device 
independent operations. 


Ordinary Symbol: One alphabetic character 
followed by zero through seven alphameric 
characters. 7 


Outer Macro Instruction: A macro instruction 
that is not used as a model statement in 
a macro definition. 


Overlay: A section of a program loaded into 
main storage, replacing all or part of a 
previously loaded section. 


Physical Record: A record from the stand- 
point of the manner or form in which it is 
stored, retrieved, and moved; i.e., one 


that is defined in terms of physical 
qualities or is meaningful with respect 
to access. (Contrasted with Logical 
Record.) 


Pointer: An address used to point toa 
table, dictionary, or data set entry. 


Position Identifier: A two-byte value 
specifying the sign and external symbol 
dictionary identifier (ESD-ID) of the 

control section in which a relocatable 
constant occurs. 

Prototype Statement: See Macro Instruc- 

tion Prototype. 


Record: A general term for any unit of 
data that is distinct from all others 
when considered in a particular context. 


Relocation Dictionary (RLD): Part of an 
object or load module produced by the 
assembler that identifies address con- 
stants in the module. 


Relocation Identifier: A two-byte value 
specifying the sign and external symbol 
dictionary identifier (ESD-ID) of an 
item referenced by a relocatable con- 
stant. 


Source Program: 
a source language that is input to the 
translation process. 


A series of statements ina Work Bucket: 


Synonyms: Two or more symbols that result 
in the same address when they are hashed 
by a hashing routine. 


System Macro Instructions: Macro instruc- 
tions that correspond to macro definitions 
prepared by IBM. 


Task: A unit of work for the central proces- 
Sing unit from the standpoint of the 
control program; the basic multi-program- 
ming unit under the control program. 


Test Translator (TESTRAN): A facility that 
allows various debugging procedures 
to be specified in assembler language 
programs. | 


Utility Data Set: In System/360 Operating 
System, a data set reserved for inter- 
mediate results. 


Variable Symbol: A type of symbol that is 
assigned different values by either the 
programmer or the assembler, thus al- 
lowing different values to be assigned 
to one symbol. There are three types 
of variable symbols: symbolic param- 
eters, system variable symbols, and 
SET symbols. Variable symbols consist 
of an ampersand followed by an ordinary 
1-7 character symbol. 


Fields attached to certain 
types of records for holding internal 
information during processing. 


rn 
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Preface 


This manual describes the internal logic of 
the IBM System/360 Operating System F 
Assembler. The introduction gives the pur- 
pose of the assembler and summarizes the 
system required to operate this assembler. 
The organization of the F Assembler follows. 
The bulk of the manual is devoted to detail- 
ed descriptions of the operating phases of 
the F Assembler. 

Effective use of this document is based 
on an understanding of the latest versions 
of the following manuals: ; 


OS Assembler Language, Order 
No. GC28-6514 


IBM System/360 Principles of 
Operation, Order No. GA22-6821 


OS Loader and Linkage Editor, 
Order No. GC28-6538 


Third Edition (December, 1970) 


OS Introduction, Order No. GC28-6534 


OS Supervisor Services and Macro 
Instructions, Order No. GC28-6646 


OS Data Management Macro Instructions, 
Order No. GC26-3794 


OS JCL Reference, Order No. 
GC28-6704 


OS Assembler F Programmer's Guide, 
Order No. GC26-3756 


OS Data Management for System 
Programmers, Order No. GC28-6550 


OS MFT Guide, Order No. GC27-6939 


OS MVT Guide, Order No. GC28-6720 


This is a major revision of, and obsoletes, GY26-3700-1 and Technical Newsletter GY33-8028. 


This edition reflects the following changes: 


e The SYSTERM data set added 
e@ Changed logic for OPSYN handling 
e The WXTRN instruction added 


Changes to the text and illustrations are indicated by a vertical line to the left of the change. 


‘This edition applies to release 21 of IBM System/360 Operating System and to all subsequent 


releases until otherwise indicated in new editions or Technical Newsletters. 


Changes are 


periodically made to specifications herein, before using this publication in connection with the 
operation of IBM Systems, consult the latest SRL Newsletter, Order No. GN20-0360, for the 


editions that are applicable and current. 


Requests for copies of IBM publications should be made to your IBM representative or to the 


IBM branch office serving your locality. Comments become the property of IBM, 


A form is provided at the back of this publication for readers comments, If the form has 
been removed, comments may be addressed to IBM Nordic Laboratory, Publications Development, 


Box 962, S-181 09 Lidingd 9, Sweden. 


©Copyright International Business Machines Corporation 1966, 1969, 1970 
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SUMMARY OF AMENDMENTS 
FOR GY26-3700-2 
OS RELEASE 21 


TERM OPTION 


New Programming Feature 


The assembler assumes the default values of NUM and STMT when 
the TERM option is specified. 


COMPATIBILITY WITH IBM SYSTEM/370 MODELS 
Maintenance 
The assembler can operate on IBM System/370 Models 135 and up. 
TITLE CHANGES 
Maintenance 


References to OS publications have been altered to reflect 
their current titles. 


Vil 


PURPOSE OF THE ASSEMBLER 


The assembler is designed to translate a 
source program coded in IBM System/ 360 
Operating System Assembler Language into a 
relocatable machine language object program. 
The assembler also assigns relative stor- 
age locations to instructions and other 
program elements and performs auxiliary 
assembler functions designated by the pro- 
grammer. The assembler performs its func- 
tions in two principal sections: the macro 
generation and conditional assembly section 
(Phases Fl, F2, and F3) and the assembly 
section (Phases F7, FI, F8, and FPP). 

The object programs produced by the 
assembler are in the format required by the 
linkage editor. The linkage editor pro- 
duces load modules, following source pro- 
gram assembly, which are executable under 
the control of the operating system. 

Several output options are available for 
the assembler. The programmer specifies the 
device for the object modules, etc. He may 
request an assembly listing, a cross- 
reference table of.symbols as part of the 
listing and the insertion of a special 
source symbol table in the object module to 
facilitate TESTRAN. See Appendix A for de- 
tails. 


SYSTEM ENVIRONMENT 


The IBM System/360 Operating System con- 
Sists of a control program and several proc- 
essing programs. The control program gov- 
erns the order in which the processing pro- 
grams are executed, allocates resources, 
and provides services that are required in 
common by the processing programs during 
their execution. The processing programs 
consist of language translators and service 
programs usually provided by IBM to assist 
the system user, plus problem programs 
written by the user and incorporated as 
part of the system. The assembler is a 
language translator, one of the processing 
programs of the IBM System/360 Operating 
System. See Figure l. 

The assembler can operate on IBM System/ 
360 Models 40 and up or IBM System/370. 
Models 135 and up. It requires only the 
standard instruction set. 


SYSTEM AND I/O REQUIREMENTS 


These requirements are divided into three 
categories: internal (or main) storage, 
external storage devices (data Beas and 
control program services. 
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Figure 1. IBM System/360 Operating System 


Main Storage 


Main storage requirements include the mini- 
mum requirement of the Operating System 
Control Program. In addition, at least 
45,056 bytes of contiguous core storage 
must be available for the assembler. Addi- 
tional core storage will be used if avail- 
able (see Table 1). The assembler is not 
reentrant. 


Data Sets 


The required data sets intlude one (SYSRES) 
containing the operating system components, 
which usually includes the assembler, three 
utility data sets (SYSUT1, SYSUT2, and 
SYSUT3), one input data set (SYSIN), anda 
data set (SYSLIB) containing system macro 
definitions and source coding to be called 
for through COPY assembler instructions. 
There are four optional output data sets 

as follows: 


Introduction 1 


Table 1. Storage Allocation 


Phase Fl Phase F2 Phase F3 Phase F7 Phase Fl Phase F8 Phase FPP 


ASM - 400 bytes 


Assembler Control Table - 2000 bytes 


MAC - 1300 bytes 


F7S & F7L logic Adjustment Table - 1000 bytes 


F3 Logic 
7600 bytes 


FPP Logic 
5500 bytes 


FI* Logic 
15500 bytes 


F2 Logic 
15500 bytes 


Fl Logic 
21000 bytes 


F7 Logic 
21000 bytes 


F8 Logic 
21000 bytes 


Sort Buffers (4) 


Write Buffers 7000 bytes 


(1 or 2) 7300 
bytes each 
(max) 


FD (Diagnostic) 
Logic and Message - 
Table 

8500 bytes 


Cross-Ref Buffer 
em pyle 1700 bytes 


Common Storage Area 


3300 bytes Generation 


Dictionaries 
(Variable Size) 
(Min = 45056 bytes 
less the sum of all 
other allocated 
main storage areas; 


Max = 65536 bytes) 


(overlapped by 
initial logic) 


Text Output 
Buffers (2) 
7300 bytes 
each 

(max) 


Print Buffers and QSAM Logic 
8000 bytes 


Dictionary Area (Variable Size) 
12288 ~ 65536 bytes 


Text Input Buffers (2) 
7300 bytes each (max) 


"Miscellaneous Buffers - 200 bytes 


Merge Buffers 
3500 bytes 


\/O Buffers 
(Variable Size Area, max 14600 bytes + 
macro library blocksize) 





Main Storage 
Sort Area 
8700-456700 
bytes 


Symbol and Internal Table Area 
12000 - 445400 bytes 


* NOTE: The FI logic area is apportioned to the size of F2 logic for core storage management purposes. The Fl logic actually occupies 


only a fraction of this area. 


ee 


NOTE: The actual size of Fl logic is approximately 3800 bytes. 


Part of the remaining area is used for storing tables. The text input buffers 


are not used by this phase. However, the large logic area and the text input buffer areas are maintained throughout the phase to avoid 
possible fragmentation of core by the Operating System and consequent unavailability for Phase F8. 


l. Print data set for the ordinary listing 
(SYSPRINT). | 

2. Assemble-and-go data set (SYSGO). 

3. Punch data set (SYSPUNCH). 

4. Remote data set for diagnostic informa- 
tion (SYSTERM). | 


See Figure 2 and Table 2. 


SYSRES. This is a Direct Access Storage 
Device (DASD) resident data set which con- 


tains the control program and other opera- 
ting system components. The assembler 
program, itself a component of the operating 
system, is usually kept ’on this data set. 


SYSUT1, SYSUT2, SYSUT3. These three utility 
data sets are used as intermediate external 
storage. Three DASD logical files, three 
magnetic tape units, or any combination of 
the DASD and tape data sets may be used. 

The use and formats of these data sets vary 
from phase to phase. 


Table 2. Data Set Usage 


¢ 






Read source 
text 


Write source 
edited text 


Initial statement 
scan 




















































































Scan programmer macro” Write source Write/read Write edited Read source Read source 
definitions & subset text loca. dictionary text/macro text text (optional) 
each local dictionary segments dictionary 
Scan main portion Write source Write/read Read source Read source 
of program edited text local dictionary text text 

= segments . (optional) 
Scan system macro Write/read Write edited Read source 
definitions; subset local dictionary text/macro text . 
each local dictionary segments dictionary (optional) 
















Read local 
dictionary 
segments 

main program 


Subset global 
dictionary and 
local dictionary 
for main program 























Read edited 
text/macro 


Phase Function | SYSUT] SYSUT2 SY SUT3 SY SPRINT SYSPUNCH/" SYSTERM 
SYSGO 
i le ES 
Write literals Write symbol 
table segments 


Write source 
edited text 


Read source 
edited text 


Conditional assembly/ 
macro generation 
















Process symbols 
and literals 





in text 






















Process PUNCH state- ee ot 
ESTRAN statements an 
ments & TEST ala 


bol tabl 
ue ss symbol table 







Process external 
symbol dictionary 

and cross-reference 
entries 






symbol dictionary 
segments & cross 
references 


atte mam 





























Write external 
symbol dictionary 


Write external 
symbol] dictionary 


Read literal base 


table and ex- 
ternal symbol dic- 
tionary segments 


Write relocation Write text 
| dictionary, diag- 
nostics, and 
Flagged statements 
Write reloca- 
tion dictionary 
Read reloca- Write reloca- 
tion dictionary tion dictionary 








Write literal 
adjustment 
table* 








* 
Process external Not used 


- symbol dictionary 





















Write object 
text 


Read literal 
base table* 


Final assembly Read text* 


FI 
i Process relocation 
dictionary entries 







Process relocation 


dictionaries 





Process cross- Read cross- Write cross- 
reference list references reference list 
Process, assembly Read Write 

statistics diagnostics diagnbstics 


*NOTE: If an odd number of iterations occur due to symbol table overflow in F7, the functions of SYSUT1 and SYSUT2 are reversed where indicated. 


Write diag- 
nostic infor- 
mation — 
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SYSRES 


8 % 
: (optional) e & 
7 


45, 056bytes 


minimum 
UTILITY FILES 


Contiguous 
Core 
Figure 2. Data Sets Used by the Assembler 


Storage 
(Plus 
Operating 
System 
Control 
Program 
SYSIN. This is a DASD, tape, or card reader 
resident data set containing the source text 
to be assembled. The source text consists 
of control text, programmer macro defini- 
tions, and text of the main portion of the 
program. The format is assumed to be 
80-byte logical record card images, blocked 
as necessary. 


SYSLIB. This is a DASD resident, parti- 
tioned data set containing system macro 
definitions and source text which may be 
COPYed into programmer macro definitions, 
into the main text of the program, or into 
system macro definitions. This may be 
blocked. 


SYSPRINT. This is a printer, DASD, remote 
terminal, or magnetic tape resident data 
set containing output text for printing. 
This may be blocked. 


~SYSPUNCH. 
put text for punching. 







Either one 
or both 







SY SLIB 


This data set contains the out- 
It may be punch, 


DASD, or magnetic tape resident. This may 
be blocked. 
SYSGO. This is a DASD or magnetic tape 


resident data set containing the same output 
text as SYSPUNCH, but is used as input for 
the linkage editor. This may be blocked. 


SYSTERM. This is a remote terminal resi- 
dent data set containing diagnostic infor- 
mation. This may be blocked. 


Control Program Services 

Several control program services (system 
macro instructions) are used in conjunction 
with data and storage manipulations and 
program control transfers during the seven 


4 


phases of the assembler. These macros are 
briefly described in Appendix B, and detail- 
ed information is given in the OS Supervisor’ — 
Services and Macro Instructions, and the OS 
Data Management Macro Instructions, publi- 
cations. The macros used are DCB, GET, 
PUT, READ, WRITE, CHECK, NOTE, POINT, 
GETMAIN, FREEMAIN, FIND, OPEN, CLOSE, 

CLOSE (Type T=TCLOSE), LINK, XCTL, and 
RETURN. | 


Data management services are given in 
Table 3. System overhead estimates are 
given in Appendix C. 


ORGANIZATION OF THE ASSEMBLER 


Major Components 


The assembler consists of the modules listed 


in Table 4. 


Basic Functions 


The assembler has two major functions in the 
processing of source programs: generation 
and assembly. See Figure 3. 

The function of the generator portion is 
conditional assembly and expansion of macro 
instructions to one-for-one statements. 
Phases Fl, F2, and F3 comprises the generator 
portion. | 

The functions of the assembly portion is 
to convert the one-for-one source statement 
and expanded macro instructions into ma- 
chine language instructions and constants 
and to produce a relocatable object program. 
These functions are performed by Phases F7, 
FI, F8, and FPP. (There are no F4, F5, or 
F6 phases.) | 

ASM is the master root segment for calling 
routines and initialization procedures. 

MAC contains and initializes the following 
I/O control program routines for Phases Fl, 
F2, and F3. 


@ READ, WRITE, CHECK, NOTE, and POINT for 


the three work files. 


@® GET for SYSIN. 


MAC is LINKed for ASM. See Flowchart l. 


MAC in turn LINKs to Phase Fl. MAC remains 
resident during Phase Fl, F2, and F3. It 
is later overlaid by RTA. 


Control is transferred from MAC to RTA, 

RTA contains and initializes the control 
table for Phases F7, FI, F8, and FPP. RTA 
then LINKs to Phase F7 and remains resident 
during Phases F7, FI, F8, and FPP. Upon 
completion of the final assembler phase 
(Phase FPP), control is returned to RTA. 
RTA returns control to ASM. 


There are two error. abort phases -- F3E 
and ERR. | 


MLO3 - Error Message Converter 


This routine coénverts the error message for 
listing and lists it. 


MLOS - Error Statement Comparer 


This routine compares the error statement 
severity code to the highest severity code 
yet encountered. It saves the new severity 
code if it is higher than any previously 
encountered. 


ML1O - Statement Printer 


This routine prints the total number of 
statements flagged. 


ML11 - Error Message Lister 


TRMXRTN - SYSTERM DCB Exit Routine 
TREDIT - SYSTERM Source Statement Editor 


If the TERM option 1s in effect. this routine 
arranges SYSTERM output depending on 


STMT/NOSTMT and NUM/NONUM options. 


SYSTRMD - SYSTERM Output Lister 


Phase FPP - Post Processor 65 
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PHASE ERR - PERMANENT I/O ERROR ABORT 


The I/O error abort phase, Phase ERR, 
obtains information about a permanent I/O 
error and then terminates the assembly. It 
consists of one control section -- IEUERR -- 
which receives control (via XCTL) from the 
phase in which the error occurs. That 

phase frees the core it originally obtained 
and waits for completion of other outstand- 
ing I/O requests before passing control to 
ITEUERR. 


66 


IEUERR issues a SYNADAF macro instruc- 
tion to get the following detailed infor- 


mation about the error -- jobname, stepname, 


unit address, device type, ddname, opera- 
tion attempted, and error description. 
This information is output to either the 
console device or SYSPRINT, or when the 
TERM option is specified, SYSTERM. 

_IEUERR returns to either MAC or RTA with 
a Return Code of 20. Figure 3 shows the 
control flow to and from Phase ERR. 


OPTIONS 


The programmer may specify the options 
listed in Figure 17 in the PARM= field of 
the EXEC statement. The options that are 
underlined in the figure are the default 
values that are assumed by the assembler if 
no value is specified in the EXEC card. 


The options are defined as follows: 


DECK -- The object module is placed on the 
device specified in the SYSPUNCH DD 
statement. 

LOAD -- The object module is placed on the 
device specified in the SYSGO DD state- 
ment. 


Specification of the parameter LOAD causes 
object output to be written on a data set 
with ddname SYSGO. This action occurs in- 
dependently of the output on SYSPUNCH 
caused by the parameter DECK. The output 
on SYSGO and SYSPUNCH is identical except 
that SYSPUNCH is closed with a disposition 
of LEAVE, and SYSGO is closed with a dis- 
position of REREAD. 


LIST -- An assembler listing is produced. 


TEST -- The object module (if produced) con- 
tains the special source symbol table 
required by the test translator (TESTRAN) 
routines. 


XREF -- The assembler produces a cross- 
reference table of symbols as part of 
the listing. 


RENT -- The assembler checks to see if the 
user's code is reentrant. 


The prefix NO is used with the above 
options to indicate that the option is not 
wanted. 


NOALGN -- The assembler supresses the 
diagnostic message IEU033 ALIGNMENT ERROR 
if fixed point, floating point, or 
logical data referenced by an- instruction 
Operand is not aligned on the proper 
boundary. The message will be produced, 
however, for references to instructions 
(e.g., by a branch) which are not 
aligned on the proper (halfword) 
boundary. 


DECK LOAD LIST TEST XREF 
NODECK, NOLOAD, NOLIST, NOTEST, NOXREF 


PARM= | 


LINECNT= 
c 


nn, OS STMT), 
55, NOALGN , DOS, NORENT, NOTERM , NONUM, NOSTMT 
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APPENDIX A. ASSEMBLER OPTIONS 


ALGN -- The assembler does not supress the 
alignment error diagnostic message. 


“OS -- The assembler will have complete 
Operating System Assembler F capability. 


DOS -- The assembler will behave like Disk 
Operating System (DOS) Assemblers D and 
F. Anything defined in either of these 
assemblers with the exception of &SYSPARM 
will be accepted. CXD, DXD and OPSYN 
will be treated as undefined Q-type DC 
and DS statements and RLDsS will appear 
in the Relocation Dictionary in order of 
their occurence (unsorted). DOS is 
incompatible with LOAD, TEST, and NOALGN. 
If any of these options are specified 


with DOS, the assembler generates a 
diagnostic message and uses NOLOAD, 
NOTEST, and ALGN. 


If contradictory options are entered, 
e.g., LIST, NOLIST, the rightmost option, 
NOLIST, is used. 


LINECNT=nn -- This parameter specifies the 
number of lines to be printed between 
headings in the listing. The permissible 
range is 01 to 99 lines. 


TERM -- The assembler writes diagnostic 
information on the SYSTERM data set. 
Options NUM and STMT can be specified 
only if TERM is used. 


NUM -- The line number field (columns 73-80) 
is written on SYSTERM for statements 
for which diagnostic information is 
written on SYSTERM. This option is valid 
only in connection with TERM. 


STMT -- Statement number will be written on 
SYSTERM for statements that are flagged 
by the assembler. STMT is valid only in 
connection with TERM. 


Note 1: If option NUM or STMT is used 
together with NOTERM a diagnostic message 
(IEU078) will be generated. 

Note 2: If option NOTERM is used for an 


assembly, NONUM and NOSTMT will not be 
listed after «OPTIONS IN EFFECT in the 
diagnostic section of the listing. 


Note 3: If option TERM is used, options 
NUM and STMT are taken as default values. 


ALGN OS RENT TERM NUM 





Figure 18. Assembler Options 
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APPENDIX B. CONTROL PROGRAM SERVICES 


GENERAL 


The control program services (macros) 
utilized during operation by the assembler 
are described briefly in this appendix. 
Detailed information is given in the 


OS Supervisor Services and Macro 
Instructions and OS Data Management 


Macro Instructions publications. 
DCB 


This macro interfaces with the control pro- 
gram. Information required to process a 
data set is presented by the assembler in 
this instruction. 


GET 


This macro is used to read SYSIN. 


PUT 


This macro is used to write SYSPRINT, 
SYSPUNCH, and SYSGO. 


READ 


This macro is used to read SYSLIB, SYSUTI, 
SYSUT2, and SYSUT3. READ retrieves the re- 
quested block from the input data set and 
places it in a main storage area. 


WRITE 


This macro is used to write SYSUT1, SYSUT2, 
and SYSUT3. Write transfers a block from 
the user's main storage area to a physical- 
ly sequential data set. 


CHECK | 


This macro checks the validity of READ or 
WRITE, It waits, if necessary, for the 
completion of a read or write operation 
and detects errors and exceptional con- 
ditions. 


NOTE 


This macro records the position of an ele- 
ment ina data set by requesting the re- 
lative position within a volume of the 
block just read or written. This allows 
the direct retrieval of the block at a 
later time. | 


104 


POINT 


This macro positions a data set for a READ 
(POINTR) or a WRITE (POINTW) from a NOTEd 
location. POINT alters the sequential proc- 
essing of a data set such that the next 

READ or WRITE operation will take place at 

a previously NOTEd position. 


GETMAIN 


This macro acquires main storage for internal 
tables, buffers, etc., by requesting the 
supervisor to allocate one or more areas of 
main storage for assembler use. 


FREEMAIN — 


This macro releases one or more areas of 
main storage previously acquired through 
one or more GETMAIN macro instructions. 


FIND 


This macro locates a partitioned data set 
member by placing the address of its first 
block in the indicated data control block. 


OPEN 


This macro is used to initialize one or 
more data control blocks so that their asso- 
Ciated data sets can be processed. 


CLOSE 


This macro disconnects one or more data sets 
from a program by closing one or more data 
control blocks. 
CLOSE (TYPE T = TCLOSE) 

This form of the CLOSE macro instruction 
can be used to temporarily disconnect one 
Or more data sets from a program. After 
repositioning to a starting point, as spec- 
ified in the macro, the data set may be | 
processed again. 


LINK 


This macro is used to link to a program 
segment. LINK passes control from one load 
module to a specified entry point in another. 
load module, keeping both modules resident 
in main storage. | 


that is defined in terms of physical 
qualities or is meaningful with respect 
to access. (Contrasted with Logical 
Record.) 


Pointer: An address used to point to a 
table, dictionary, or data set entry. 


Position Identifier: A two-byte value 
specifying the sign and external symbol 
dictionary identifier (ESD-ID) of the 
control section in which a relocatable 
constant occurs. 

Prototype Statement: See Macro Instruc- 

tion Prototype. 


Record: A general term for any unit of 
data that is distinct from all others 


when considered in a particular context. 


Relocation Dictionary (RLD): Part of an 
object or load module produced by the 
assembler that identifies address con- 
stants in the module. 


Relocation Identifier: A two-byte value 
specifying the sign and external symbol 
dictionary identifier (ESD-ID) of an 
item referenced by a relocatable con- 
stant. 


Source Program: 
a source language that is input to the 
translation process. 


Test Translator (TESTRAN) : 


A series of statements in a Work Bucket: 


Synonyms: Two or more symbols that result 
in the same address when they are hashed 
by a hashing routine. 


System Macro Instructions: Macro instruc- 
tions that correspond to macro definitions 
prepared by IBM. 


Task: A unit of work for the central proces- 


Sing unit from the standpoint of the 
control program; the basic multi-program- 
ming unit under the control program. 


A facility that 
allows various debugging procedures 

to be specified in assembler language 
programs. 


Utility Data Set: In System/360 Operating 
System, a data set reserved for inter- 
mediate results. 


Variable Symbol: A type of symbol that is 
assigned different values by either the 
programmer or the assembler, thus al- 
lowing different values to be assigned 
to one symbol. There are three types 
of variable symbols: symbolic param-. 
eters, system variable symbols, and 
SET symbols. Variable symbols consist 
of an ampersand followed by an oresneny 
1-7 character symbol. 


Fields attached to certain 


types of records for holding internal 
information during processing. 
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